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Voor GERO- en BANKREKENINGNUMMERS zie pag. 2 


Stb dede ede ee a eee ed ed ed A ed ed dee ht 
ACORN NIEUWS Uitg.Fed.Acorn Computerclubs Ned/B. 
Yerschijnt 6-8 x p/jr. 


FEDERATIE 


Ennens! 


um 





voorzitter: A, Miltenaar 
Thorbeckestraat 38 
Blél dp Epe 


zecretaris: nog even wachten en deze functie wordt vervuld. 
tijdelijk correspondentieadres: 
FACE 7 
Haringvliet 391 
8032 HL Zwolle 


penningmeester: G, Visser 
Haringvliet 391 
8032 HL Zwolle 
tel: 038-5465611 


postgiro: 5244293 : bankgirp: 935,32,87,283 
Beide tnv penningmeester Acorn Computerclub te Zwolle. 


redactie-adres Acorn Nieuwst Henk Reinders, 
Leeuwarderstraat 8, 
9718 HX Groningen, 





Redactie 


De aandachtige lezer heeft het reeds’ gemerkt, Een ander redactie-adres. Het 
nuamer wat unu leest is het laatste nummer wat van de handen van ‘Ton Otter 
komt. Een aantal leden van de regio Noord hebben het lafwaardig initiatief 
genomen om zich in 1984 voor de vervaardiging van uw lijfblad in te zetten. Zie 
elders in dit nummer. 

Wìj willen Ton Otten de meeste dank doen toekomen voor de werkzaamheden die hij 
voor deze (toch redelijk zware) taak verricht heeft. Wij hopen dat hij met even 
veel plezier de 1984-en-verder exemplaren zal lezen als wij dat met “zijn” 
spruitglingen hebben gedaan. 


Contributie 1984 

Onder deze titel is in de vorige Acorn Nieuws ook wat geschreven. Wat daar in 
stand is nog steeds van Kracht. Het enige punt wat daar een beetje overbodig in 
stond betreft het niet te lang wachten met contribueren. De afgelopen acties van 
het (seni-) averheidspersoneel hebben wat dat betreft enig roet in het eten 
gegooid, 

Voor de leden die de contibutie voor 1984 nog niet overgemaakt hebben is dan ook 
de volgende oproep: 

Doet u dit zo spoedig mogelijk, zodat een volledig regionaal overzicht niet al 
te lang op zich laat wachten. \ 

Degenen die om wat voor reden dan ook niet in- het bezit zijn van de 
acceptgirokaart . (bv omdat zij later lid zijn geworden) worden verzacht de 
contributie net een gewone overschrijving te voldoen ‘op een van’ beide 
bovenstaande gironumners, Vermeldt u er dan wel even bij dat het gaat om de 
contributie van 1984 en van welke regio u lid bent? 


Archiefdlenster 

Voor bandjes, datasheets, EPROM's en alle andere vormen van dienstverlening kunt 
u terecht bij de regionale archiefdiensten. Mocht in uw regio iets ontbreken, 
dan kan het regionaal bestuur u verder op weg helpen. 

De landelijke archiefdiensten geven regelmatig een overzicht uit van wat er in 
die archieven aanwezig is. De regionale archiefdiensten kunnen daaruit dan een 
keus maken van wat zij in het archief willen hebben, 


Geheugenkaart; 16 kEyte extra in de Aton fl. 35,-- 
Schakelkaart; meerdere EPROM’s op Axxx (incl. 74051335) fl. 45, 
Frogrammerkaart; zelf programmeren van EPROM’s fl. 17,-- 
Herdruk Acorn Nieuws 1982; 97 pagina’s wetenswaardigheden fl. &,-- 


Bovenstaande artikelen kunt u bestellen door het desbetreffende bedrag over te 
maken op een van de gironummers. U kunt natuurlijk ook de bestelling via de 
regionale penningmeesters laten lopen, zodat u de bestelling veelal tijdens uw 
volgende bijeenkomst in ontvangst kunt nemen, 


Sulanaetelling advraaad 

Voor het aanvullen van het assortiment in de clubwinkel zouden wij graag willen 
weten hoe de belangstelling is voor enkele zaken. Zoals daar zijn: 

- Big Benny; zie A.N. 1983 nr.4 (met of zonder onderdelenpakket) 

= VIA-kaart; voor de schakelaars meerdere VIA’s op een print 

- telefoonmodem; om via de telefoon Atom’s te koppelen 

= kleurenkaart; kleuren uit de Atom met evt. geluid en 60/50 Hz. 


Degenen onder u die belangstelling hebben voor, aan het ontwikkelen zijn of 
reeds ontwikkeld hebben van een van deze onderwerpen gelieve dat kenbaar te 
maken via een briefkaartje aan het redactieadres. Ook wanneer in dit rijtje iets 
ontbreekt graag even bericht. 

In het volgende Acorn Nieuws komt dan een overzichtje te staan van de reacties. 


LANDELIJK BANDJESARCHIEF VERPLAATST, 


Wegens het overnemen van een bestuurstaak in de regio 
Noord-holland door N.Stad, vindt er een overdracht 
plaats van het landelijk bandjesarchief naar een nieuw 
adres. 

De regionale archieven kunnen voortaan nieuwe bandjes 
bestellen bij: 


HH. Blijleven 
Noordzeestraat 47 
1784 BL Dem Helder 
zes 167 54 


Blz, 


2= 3 
he 


OA 


or 


10 


11 


11 


12-14 
15 


17-18 
19-25 
26-28 
29-30 
31-32 
33-34 


35-50 
35-38 


39-43 
bhek5 
h6-48 
19-50 

51 


51 
52-55 


IN DIT NU MME R 


FEDERATIEF: huishoudelijke zaken, 

INHOUDSOPGAVE: Hier bevindt u zich nu} 

NAMEN,ADRESSEN van REGIONALE BANDJESARCHIEVEN, met alle 
recente wijzigingen. 

tn NIEUW Regio-Bestuur in Rotterdam, wist u dat? 

Het DATA-SHIKETS archief: een overzicht, 

Gezien in REGIONALE BLADEN: een overzicht dat almaar 
groeit, evenals onze club, 

INTEGER-DECIMALEN: rekenen in Floating-point, maar zon= 
der FP-ROMS Hoe kan dat? Uit: Personal Computer NEWS, 
Over REGIO=-BLADENseen suggestie van de regio Arnhem om 
meer afleveringen van Â‚N, per jaar te doen verschijnen, 
MIJN IDEE! Zie hieronder, 

REDACTIONEEL: Uw scheidende redacteur laat zichzelf uit 
en introduceert de nieuwe ploeg. 

VERSLAG van het ONTMOETINGSWEEKEND te RENDEUX, 
INFOBLOK:; voorziet in TIPELS bij 3000/6000 Baud COS, 
BRANDPUNT: deze keer de Regio Zeeland, 

MJCOS-SOURCE: een herhaling van de te lichte afdruk van 
vorige keer, met excuses voor het ongerief, 

Over VOEDINGEN gesproken: een goed verhaal uit België, 
voor de NIET-ingewijden, 

PROM V2,0: een SNELLER en KOMPAKTER EPROM-programma, 
uit Twenthe, 

‘n Methode om 3 -graads vergelijkingen op te lossen, mèt 
uitleg van het hoe en waarom, óók uit België, 

Een verhaal van Bram Poot voor LOGICA=-jongleurs; voor 
de fijnproevers dus, 

ls proef -op=-de-som kunt u het RESULTAAT van uw zelfbe- 
dachte LOGICA-funkties ZICHTBAAR maken, op het SCHERM 
of op PAPIER, uit Utrecht. 


15 pagina's vol met GRAPHICS! 


Een héél bijzondere SCKEENDUMP: hij start op INTERRUPT en 
je kunt er valse bankbiljetten mee maken (zie voorpag.) 
Nog meer graphics, maar dan met een RESOLUTIE van „... 
eee. 512 mk 384 dots!!! Hoe dat kan, legt Rob van Dort 
u graag uit, Ook hoe die OPTILLUSIE van A‚N,3-'83 werk- 
te, wordt u nu onthuld, 

Naar aanleiding van de OPTILLUSIE van Kob gaat dhr Dek- 
ker nog even op dit onderwerp door, maar dan gewoons 
GEZICHTSBEDROG noemt hij het, 

Als aanvulling op Screendump, die bitje voor bitje uite- 
print, is hier het ONTWERP van een EIGEN KARAKTERSET, 
te plaatsen in de EPROM van uw Microline=-80, 

Als u het programma Screendump te lang vindt en aan het 
gebruik van een interrupt geen behoefte hebt, maar wòl 
in MODE 1,2,3 en 4 wilt printen, dan moet u hier zijn! 
Hebt u ATOM-CHESS al 'ns in MJCOS willen SAVEn? Gaat 
niet, hè? Martin Jansen, de geestelijke vader van MJCOS, 
laat het er niet bĳ zitten, 

WORDPACK, ZWART=op=-WIT;: Geen hagelslag voor de boterham 
maar 't ziet er gewoon beter uit, vindt Martin Jansen. 
Nogmaals SCHAAKPKOGRAMMA!'s, maar dan over het ZELF ONT- 
WERPEN hiervan, 't Lijkt ingewikkelder dan het is maar 
daartegenover staat dat je het zo moeilijk kunt maken 
als je zelf wilt. Een UITDAGING, vindt Roland Vansteen- 
kiste van de ACC-België. 


vervolg: 


Blz. 


56 
57-59 
60-61 

61 
62-63 

63 
64-66 

66 


67 


65-73 


7h-75 


76 


77 
77 
78 
79 
79 
80-81 
82-84 
B5-87 
88-89 
90-98 


98-99 


SIN 


DIT NUMMER" 


Een BO-koloms VDU voor de Atom, gebaseerd op het recen- 
te ontwerp van Elektuur, 

Hebt u zichzelf al eens voorbiĳj-getikt? Nee? Dan is hier 
uw kans: NYPE AHEAD mòt interrupts. 

Vitbreiding van het toetssaberd via een universele 25- 
pens plug is toch veel netter? vinden D‚,Urbanik en 
L. Veltmejer, 

Hoedje, een grafisch plaatje van Gerard Akkermans, 

Nog meer hardware: tijdmeting tussen twee LICHT-pulsen 
(een START en een STOP-puls), uit een (oude ) CURSOR, 
door Jeroen Baten, 

SPIRAAL, een mooi grafisch plaatje uit de HCC=-Nieuws- 
brief, 

't Lijkt een beetje op 't programma van Jeroen Haten: de 
ATOM als FREUUENTIETELLER, door Fred Appelman. 

Driehoek van Pascal: geen compiler, maar WISKUNDE, 
TOONKUNSTs Marien viun Westen begreep wat ik bedoelde 
met GOLFVORM, en naakte het resultaat (nog?) welluiden- 
der met een b-bits D-A-converter, 

Met dank aan de uitgever van “kiJKk" een suggestiet artie= 
kel over "LIFE" ofwel "Conway Transformaties", Het oor- 
spronkelijke programma uit het artikel is vervangen door 
een sneller (assembler!) programma van Peter Ehrlich, 
SOURCEMAKER: de nieuwe manier van disassembleren, com-— 
pleet met o.a. LABELS. Het resultaat kunt u direct weer 
RUNNENS} Door Arie Marchal en Ed Ronda, 

Wereldtijd: Wim Ernst weet hoe laat het is, 

Âanvuìllend geef t hij een tip voor MeERLICHT uit uw MONI 
TOR. 

Voor ELEKTRONICI: complex rekenen (atsof gewoon rekenen 
niet genoeg is!) 

Een SPELLETJE: tea-cups en 'n TIP, 

Nog meer TIPS uit 'Het Bronsgroen Eikeltje" 

TABULATOR en PAUZE voor in uw toolbox, 

Doe Routine 1 er ook maar bij. 

MEMORY voor twee personen: een SPELLETJE, 

WEDLOOP: voor paarden liefhebbers, 

Het LAATSTE deel van de ASSEMBLER-CUHSUS, 

Met HULDE aan LEENDERT BIJNAGTES!! 

tn Vergelijking van de JOSBOX met de AXR-1, Nu weet u 
eindelijk 't naadje van deze kous, 

Beschrijving met schema voor BATTERY BACK-UP op de 
SCHAKELKAART . 

DBASE V2,0:3 een gedetailleerde beschrijving van deze 
ELEKTRONISCHE KAARTENBAK, 

TOETERS & BELLEN van de Josbox:; nog meer naadjes van 
deze club-kous, 


Bljgewerkt overzicht van de reqlonaie bandjes archieven, 





NOORD-NEDERLAND 1 J. Homburg 
Korreweg 185 b 
9714 AK Groningen 
OOST -NEDERLAND 1: F„ v/d Biezenbos 
Burcht 75 
7698 JC Almelo 
OVERIJSEL /GELDERLAND : H. v/’t Riet 
Grevelingen 12 
8032 KT Zwolle 
UTRECHT E.‚0. : H. Seymonsbergen 
P. de Haaghlaan 57 
3741 RL Baarn 
NOORD-HOLLAND s H. Blijleven 
Noordzeestraat 47 
1784 BL Den Helder 
DEN HAAG E.‚0. : H. v/d Heyden 
Pr. Annalaan 574 
22635 XZ Leidschendam 
DELFT E.0. : P. v/d Berg 
G. v Oostenstraat 42 
2612 RH Delft 
ROTTERDAM EO. : Mevr. J, Bruins-Sas, 
Vlaamsestraat 221, 
3332 Es Zwijndrecht 
ZEELAND + B. Vundering 
de Butstraat 47 
4561 LT Hulst 
ARNHEM E.0. : G.J. Bouwman 
R.‚ Kolfschotenlaan 11 
&B21 JG Arnhem 
OOST -BRABANT 1 C. Kwakernaak 
v. Speycklaan 29 
5694 CG Breughel 
VENLO E.0. : G. Borghaerts 
Hatertseweg 3 
6381 KD Malden 
LIMBURG : J., Smeets 
Resedastraat 28 
6165 TP Geleen 
BELGIE 1: R,‚ Leyssens 
Oudebaan 127 
B 3550 Heusden-zolder 





Adres wijzigingen of eventuele fouten in bovenstaande 
lijst kunnen voortaan aan de heer Blijleven doorgegeven 
worden. 


N. Stad 


CORN computerclub nederland 
regio rotterdam. 


NIEUWS UIT ROPTERDAM 


In verband met de verhuizing van de "oude" coördinator 
van de Acorn Club Rotterdam, is er in onze regio een 
nieuwe coördinator, De taken zijn nu als volgt verdeeld: 


coördinator — M‚, Oosterom tel: O10=774648 
ledenadm. /penn. - R, de Haan 01804-25160 
secr./redactie — J. v. Nieuwenhuizen 01883-15129 
drukwerkarchief = R‚D, Urbanik 0110-762878 
bandjesarchief = Mw, Bruins 0078-123764 


Er is besloten voortaan dedere eerste donderdag van de 
maand bij elkaar te komen, bij Mw, Bruins (Vlaamsestraat 221, 
Zwijndrecht ). 


Het DATASHEETS-archief 


Hier volgt een overzicht van de in het datasheets 
archief aanwezige datasheets. De kopieerkosten 
bedragen f 0,15 per kopie, 


datasheet blz. kopie-kosten 
6502 10 F 1,50 
6520 h f 0,60 
6522 10 f 1,50 
6522 24 f 3,60 
6530 10 f 1,50 
6532 8 f 1,20 
2114 k { 0,60 
2716 5 S 0,75 
2732 h f 0,60 
8416 5 f 0,75 
6847 12 f 1,80 
6545 10 f 1,50 
8255 21 S 3,15 


Bovenop de kopieerkosten komen ook nog de porto- 
kosten, Deze bedragen: 


aantal kopien portokosten 
0 == 7 f 1,10 

7 - 13 f 1,60 
13 =— 40 f 2,30 


De datasheets zijn te bestellen door het totale 
bedrag over te maken op gironr: 3643518, 

ten.v. Ge, Akkermans, Wikke Ì, Huizen; 

onder vermelding van de gewenste kopien, 

Dit overzicht is niet helemaal kompleet, dus als 
je datasheets wil hebben van een ic dat er niet 
bij staat, laat dit dan even weten! 


Gezien in regionale bladen, 


Acorn Newsletter nr. 5 


Josbox # AXKl: instructie voor instructie vergeleken / Where do 

we go from here?: Wat te doen nu de Atom niet meer geproduceerd 
wordt? Antwoord: Zuinig erop zijn en de weinige sof tware-leveran- 
ciers te vriend houden! ( Uit: "Acorn User", october'83)/ De inkt- 
straaltechniek en de JPIO1. (Uit: "De mini-microcomputer", octo- 
ber '83)/ Analyse van studietoetsen (Uit: "DATANEWS", 18- october 
'83)/ Computer-cassettes testen.......Ja, maar!tlt: Over goede en 
slechte cassettes, recorders en hoe ermee om te springen/ Alter- 
natieve Toolbex: het uitbreiden van de Atom met extra statements, 
op z'n Engeis (Uit: "Acorn User" , noveuber '83)/ Speech-synthe- 
sizers: een instruktief verhaal over het digitaal opslaan en re- 
produceren van spraak. / De IEEE 488 bus: Over het koppelen van 
randapparatuur aan de computer d.m.v, deze universele bus. / Digi 
tal logica probe: uitleg bĳ de datasheet van deze signaaldetector./ 
Zelf graphics ontwerpen: Over pool en rechthoekige coördinaten, 
cirkels, linen, etc., voor beginners. / LOGO-demo: een inleiding 
op deze kirnderlyk eenvoudige, gebruiksvriendelijke, maar toch 
krachtige computertaal,/ Eerste ervaringen met een Floppy: met 
vallen, opstaan en het schakelschema wordt men wijs; een zéér in- 
structief verhaal, 


Stacker October '83, 


Assembler Bubblesort;: een sorteerroutine, in assembler geschreven, 
met uitleg over de manier waarop het aangepakt wordt/ MIRAKEL ver- 
beterd; een aanpassing van een superkorte disassembler (255 bytes) 
waardoof deze 3 bytes korter wordt/ Het ELIMIN programma: een op- 
lossingsmethode voor N vergelijkingen met N onbekenden, door de 
eliminatie-methode (dit is het sluitstuk van een reeks uitstekende 
wiskundige artikelen voor beginners door J. Woldringh De opvol= 
gers van de 6502-processors: een beschrijving van de nieuwe ine 
structies die beschikbaar zijn op de nieuwe processors 65C02 en 
R65CO2/ Conversietabel voor decimaal- hexadecimaalconversie en om- 
gekeerd (uit: CRC Handboek)/ Berekening van een onbeperkt aantal 
cijfers in een breuk: een methode om decimale breuken tot vele cij- 
fers achter de komma dóór te rekenen. 


Stacker November 'S3 


N! : het berekenen van (een goede benadering van) Nt (spreek uit: 
N-faculteit)/ Telefoon-modem: nu eenvoudig zelf te bouwen door ge- 
bruik temaken van een nieuw IC/ Voor hen die er niet uitkomen: 
Een handige aanvulling op 3D-Maze uit het ATOM MAGIC BOOK, zodat 
u. nu de kluts (awz. de plattegroud) niet meer hoeft kwijt te raken/ 
De diskdrive: een uitgebretd CATALOGUS-programma voor diskette, 
met beschrijving van "hoe en waarom"/ Een disas-liĳst van het Sy 
steem-programma TRACER/ De opvolgers van de 6502-micropocessors, 
deel 2: Met een assembleerprogramma voor deze nieuwe processors, 


Stacker December '83 


Adressering: over het omschakelen van hele geheugenpagina's/ Prin- 
cipeschema van de Schakelkaart/ KHINOCEROS: Len spel waarbij het 
erom gaat om door een bos met argwanende, bijziende neushoorns heen 
te komen/ KAT-IN-DE-ZAK: De achtergrond bij een computer-simulatjie 
van bekend beslissingsprobleem;: Hoevet vertrouw ik mijn concurent?/ 
a 


Hardware: Over het aan elkaar knopen van verscheidene computers 
(bij het simulatiespel "KAT-IN-DE-ZAK")/ ASCII-ROUTINE: een routine 
veor het maken van eon Leukstef ile, voor bewerking door de Tekst 
verwerker, of voor vastleggen op cassette (voor kopy voor "De 
Stacker") / SORT @n BPRINT: Twee nieuwe commando's: SORT sorteert 
een bestand en BPRINT print positieve en negatieve getallen in een 
aparte kolom, 


Cursor nr,6 


Het Wachtwoord; Een programma dat vraagt om een geheim wachtwoord 
in te tikken (dat niet op 't scherm komt4) anders wordt de toe- 
gang geweigerd!/ NOISsE-VRIJ PLOTTEN: Dit programma wacht het 
Juiste mement af om te gaan plotten, daartoe aangezet door de syn- 
chronisatie-impuls van de videoprocessor./ ZERO-PAGE RELOCATOR: 
Zoekt de door een programma gebruikte ZP-adressen bij elkaat en 
vervangt ze door andere./ Numeriek toetsenbord: Een subroutine die 
het toetsenblok 7&9uijklm transforneert in een standaard auumeriok 
toetsenblok. / A-D-CONVELTER: Een simpele schakeling ou de stand 
van een analoge joystick (= potentio-meter) naar een ATOM-variabe- 
le te transformeren, / DOLBELSTEEN: op uw ATOM-scherm, voor als u 
de echte stenen te onhandig vindt!/ PRINTEN MET MASKER: Een pro- 
gramua dat alleen een bepaalde getalvorm,’ bijv. "f 93,21", accep=- 
teert; handig bĳ het invoeren van geldbedragen!/ Z-4-STAP INTE- 
GRATOR: Een snel wiskundig integratieprogramma, dat zelf de stap 
grootte aanpast aan de gewenste nauwkeurigheid. / SNELLEZEN: Een 
spelprogramma, waarbij het erom gaat een snel "langslopende" tekst 
te lezen./ INFOBLOK: Een programma dat titels maakt en herkent bij 
de supersnelle 300V en 6000 Baud gassette-lees en -schriĳf routine 

( zie dit nummer, paginat5s)/ WOORDZOEK: ken soort Mastermind-spel 
maar nu met woorden van maximaal 10 letters.,/ JOYSTICK GAMES: De 
aanpassing van "CENTIPIEDE", "PACKMAN" en "PROTECTOR" aan gebruik 
me t joystick, / HEF DUPLICEREN VAN PROGRAMMA'S MET DE BBC: De titel 
zegt 't al./ (Titelloos) : Een vergelijking van een tiental micro's 
op het punt van beschikbare BASIC-commando's, 


Het Bronsgroen Eikeltje nr. 3 


INFOMASTER: Een gedetailleerde beschrijving van het gebruik van dit 
data-base-programmua, Volgende keer volsyt de beschrijving van het 
programma zelf./ ANALOOG-DIGITAAL CONVERTING: Een uitgebreid ver- 
haal, met uitleg voor de niet-ingewijden, van eer eenvoudige, goe- 
de en goedkope zelfbouw A-D-converter. 


Acorntjesbrood nr, 3 


PRIPRO 1: Eerste van een aantal artikelen over printen van eigen 
of andermans schermcreaties, zoals spacewuppies, astrobirds of 
andere fantasiefiguren. Dit eerste deel gaat over print-program=s 
ma's voor figuren, opgebouwd uit gewone karakters. Met name over 
de meest handige aanpak van zoiets,/ SWEET 16: THE 6502 DREAM MA- 
CHINE;s bit is de beschrijving van een interpreter, die een complete 
set nieuwe (16 bits!) instructies accepteert, Hierdoor verandert 
uw Atom schijnbaar in een 1o-bits machine! De nieuwe instructies 
Zijn eenvoudig mengbaar met "gewone!" assembler-mnemonics en BASIC. / 
SYMBOLISCHE ASsEMBLEK voor de ATOM: Deze assembler accepteert ech- 
te namen voor labels en variabelen, waardoor assembler-programma's 
een stuk beter leesbaar worden!/ LINEAIRE NETWEkk ANALYSE: Dit 
programma berekent de frekwentiekarakteristiek van elektronische 
schakelingen. Ken zóór gedemen stuk werk! / 


PROM V2,0: Een verbeterde EPROM-programmer;s zie dit nummer, pag.26. 
/ STELNKOLENNEDERLANDs+ Over het gebruik van (kngets) jargon in de 
computerwereld (lees: rekentuig-wereld)/ VERBORGEN 6502 INSTRUC- 
TIES: Over de open plaatsen inde iustructietabel van de 6502, 
Deze instructies doen soms toch wel bruikbare dingen!/ SOFTWARE: 
FORTH; Eerste van een serie artikelen over de programmeertaal 
FORTH, maar nu iets meer op de Atom gericht. Dit deel beschrijf t 
aanpassing aan het gebruik van de club 16k RAM-kaart,/ SOFTWARE: 
Geheugen-editor: Een programma om aan de hand van een HEX- of 
AsCIl-dump de geheugeninhoud te veranderen./ SOFTWARE: Zombies: 

een spelletje, over eten en gegeten worden, 


ATOMIX nr 5 


DISLIST:s Dit programma geeft een disassembler listing in twee 
kolommen en is dus speciaal geschikt voor Al papier, / MATRIX IN- 
VERSE: een langdurige wiskundige bewerking. / GRAFIC COPY: geeft 

een hard=-copy van het scherm in CLEAR4-mode (een mooi gestructureerd 
programma! )/ KIJK MAAR WAT HET DOET: Een pseudo J-dimensionale te- 
kening met een zeer bokend onderwerp./ KRIJG NOU DE KLEUREN! :Een 
programma dat, gebruikmakend van de Delftse kleurenkaart, de Franse 
Britse en Amerikaanse vlag in kleur op het scherm zet. 


ATOMIX nr 6 


VIBRATO: Laat de toonhoogte van een opgewekte toon snel of lang- 
zaam, veel of weinig trillen,/ REGELS SCHOONMAKEN: een zeer snelle 
manier om een regel op het scherm uit te poetsen./ DISAS in PROw1 
GRAMMA!S; Over het gebruik van DISAS-commando's van de Josbox in 
een programma,/ SNOW-TEXT: Laat stippen op uw scherm samensmelten. 


Verder bevat dit nummer van ATOMIX een complete opgave van de in- 
houd van het bandjes-archief, van het drukwerk-archief en van het 
listing-archief, 





GELEZEN: Integer-decimalen. bron:fFersonal Computer News 


Onder deze vage kop geven we hier een tip vaor hen die nog steeds 
geen Floating Point ROM hebben en voor hen die dusdanig veel 
geheugen nodig (denken te) hebben, dat Floating Foint variabelen 
niet gebruikt kunnen worden, 


10 D=. &12 

20 IN. "X"X, "YY 
Sh A=X/YV;REXAYKIE 
40 C=B/Y;D=BAYE10 
50 E=D/Y;sF=DAY&10 


6 G=F/Y 

70 FP. "X/Y="A""C,E,G 

80 END 
Tip: in plaats van al je Lezschitbare variabelen op te souperen 
kun je natuurlajgk ook arrayvelemerntern gebr uiken., Bovendien kurt je 


deze constructie dan in een “leap” plaatser. 
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kx OVER REGIOBLADEN ee DE MENING VAN DE (HELE !* REGIO ARNHEM E.,0. 


WIJ ZIJN EEN VRIJ KLEINE REGIO, MET RELATIEF WEINIG DESKUNDIGHEID. 

EEN REGIOBLAD KENNEN WIJ NIET. DE MAANDELIJKSE CLUBAVONDEN STAAN CENTRAAL. 
ONDERLING WORDT WEL WAT UITGEWISGEL( MET FOTOCOPIEEN, ONTWERPEN EN PROGRAMMA'S, 
DIE NAAR ONZE MENING VAN BELANG ZIJN VOOR MEER DAN 1 OF Z LEDEN, WORDEN ALLE 
NAAR HET LANDELIJKE ACORN NIEUWS GEZONDEN, 

VAN DE OPSOMMING VAN ULT DE REGIONALE CLUBELADEN' IN AN 5-55 LEREN ONS VELE 
ARTIKELEN VOOR LANDELIJKE PUBLICATIE GESCHIKT. WELLECHT IS HET MOGELIJK, OM HET 
LANDELIJKE BLAD SIMPELER VAN REDACTIONELE OPZET TE MAREN: AL HET EINNENKOMENDE 
‘VOER* ER IN OPNEMEN EN FREQUENIER DOEN VERSCHIJNEN, 

MEN HEEFT WELLICHT EEN CONTRIBUTLEVERHOGING OVER VOOR EEN GROTERE HOEVEELHEID 
INFORMATIE IN BREDERE KRING 6! 


REDACTIONEEL 


Toen ik mij een jaar geleden als landelijk redacteur opwierp, was 
dat met de uitdrukkelijke bedoeling deze job voor niet langer dan 
een jaar te doen, 

Anders gaat de lol eraf, vind ik, 


Welnu, ik prijs mij gelukkig dit schone voornemen realiteit te heb 
ben zien worden door een initiatief vanuit de regio Noord, Een 
viermanschap gaat het redacteurschap van mij overnemen, waarbij een 
geschikte taakverdeling de hoeveelheid werk per redacteur aanzien 
lijk zal kunnen reduceren, 


Dit laatste lijkt me te meer een goed idee, omdat ik het eigenlijk 
wel eens ben met hetgeen de regio Arnhem hierboven schrift. Het 
huidige nummer is honderd pagina's dik, en zie in de rubriek 
"Gezien in regionale bladen" maar eens wat er allemaal nog niet 

in staat? Daarbij komt nog dat het huidige nummer ruim een maand te 
laat uitkomt, 

Dit laatste heeft overigens andere oorzaken, zoals ziekenhuisop- 
name ín December jl. 


De nieuwe ploeg staat dus klaar op een goed moment, Met 300% meer 
mankracht en frisse ideëen over de meest geschikte opzet en aan= 

pak (waaronder automatisering, maar dat zal Henk Reinders u zelf 

wel vertellen! ). 


Gaarne wens ik Henk en z'n ploeg alle succes toe en ik hoop dat ze 
er óók plezier aan zullen beleven, net als ik dat gedaan heb, 


uw ex-redacteurs Ton Otten, 


Verslag van het Ontmoetingsweekend In Hendeux-Haut, 


Op 26/27 november 1983 werd door de Belgische afdeling van de 
Acorn Computerclub, bij gelegenheid van haar éénjarig bestaan, een 
ontmoetingsweekend georganiseerd, met het themas 

De ATOM is allang geen ATOM meer; wat nu? 


Hiertoe werd de deur van Huize '"Vakantiegenot!' te Rendeux-Haut 
wijd open gezet voor belgische en Nederlandse Atomisten, teneinde 
elkaar te ontmoeten ins 


1. Een wedstrijd; welke regionale afdeling presenteert de beste 
toepasning van de APOM? 

2. Een debat over het thema van dit ontmwoetingsweekend: 
De ATOM is geen ATOM meer, 


Deze activiteiten waren gegarneerd met vóél gezellig en informa- 
tief samenzijn, veel en lekker eten en afgesloten met een prijsuit- 
reiking met vele prijzen en als verrassende hoofdprijs voor Brabant 
Ooìt: Manneke Pis! 

Een korte samenvatting van de wedstrijd en van het debat volgt 
hieronder, 


1. De wedstrijd, 


De volgende 6 presentaties waren aanwezig: 
1,1 Twente: 
Symbolische Assembler. (o.a. namen voor labels i.p.v. Lig, 
LL) 

Voordelen: Betere leesbaarheid van assembler programua's 
Binaire getallen kunnen ingegeven worden 
Geen schakel- of geheugenkaart nodig 
Standaard hardware 


1,2 Rotterdams 

a. Hardware: Atom-noederboard in plexi-glas kast ingebouwd 
tesamen met voeding, EPROM progranuiua, schakel- 
kaart, 2x geheugenkaart, UF modulator en speaker, 
Los toetsenbord met aansluitingen voor joysticks. 
Kast uitklapbaar zodat alles gemakkelijk bereik 
baar is, 

b. Hardware; Compleet systeem op verrijdbaar audiorack gebouwd, 

ec. software: Div. Schakel Operating Systems, 


1,3 België: 
a, Demonstratie doorlopend laden en verwerken van: 
1. Keclame programma voor ACORN CLUB 
2, Muziekprogramnma 
3. Tekening (soort CAD/CAM) 

b, Spraakgenerator: Woorden/klanken kunnen zelf "gecomponeerd" 
worden, zijn echter gebaseerd op Engelse 
klanken, 

c. De ATOM is geen ATOM meer! 

Een geheel andere computer, echter wél seba- 
seerd op onze trouwe ATOM, Uitgevoerd met: 
2bestuurbare cassette-recorders d‚m,v. DOS- 
kaart, 

Obk RAM in rack & 16k KAM op moederboard. 

R5 232 interface, EPROM programmer, Elektuur- 
bus 

d, Demonstratie van de taal LOGO. 

Uitgangspunt: LUGO is een kinderlijk eenvoudi- 
1 ge, gebruiksvriendelijke maar toch krachtige 


computertaal, Men leert er gestructureerd mee 
programmeren, 


155 Overijssel: 
Hardware: Een besturingssysteem voor elektromotoren gebaseerd 


op het tellen van pulsen voor het bepalen van het 
aantal omwentelingen, 


1,5 Oost-Brabant: 

a. Software: f Track systeen 
Charon, 300, 1200, 3000 Band enz. 

b. Adressenbestand met schitterende beeldscherm behandeling. 
Laden en "saven" met 6000 band, 

ce. Het klapstuk van de presentaties 
MDCR = Mini Digital Cassette Recorder. 
Een juweeltje van een (inbouw) recordertje voor 
het laden en saven van programma's op 6000 band 
op mini-cassettes. De bijbehorende software was 
uitmuntend en het geheel doet niet onder voor 
een Floppy-disc-unit, HULDE: SSS 


1.6 Delft en Oost-Brabant: 
a. Hardware: Een héél goedkope kleurenkaart die nog werkt ook, 
b. Software: Microsoft waarmee de Atom geen Atom meer Ás, 
doch wordt omgedoopt tot FACTUM, 
FACTUM is latijn voor: door mensen gemaakt, FAC 
staat voor: Federatie Acorn Club. 
Deze microsoft zal nog verder worden uitgebreid, 


Na rijp beraad kwam een ad hoc benoeude jury van experts tot de 
volgende rangschikking, waarbij als prijzeli (computer}boeken, 
EPKOMS, flessen wijn, cassettebandjes en (heel toepasselijk) een 
bijna levensgroot beeld van Manneken Pis: 


1 Brabant-Oost 
België 
Twenthe 


2 

3 

kh Overijssel 
5 Rotterdam 
6 


Delft en Oost-Brabant 


2. Discussie: “De Atom is geen Atom meerjs wat nu?" 


De "aftrap" voor deze discussie werd gegeven door ACB-voorzitter 
Jacques Mijngheer, die de vergadering de vraag voorlegde: Wat is 
er van de Atom over? 
Dhr, Borghaerts ging hierop in door zich af te vragen waaraan je 
kunt afmeten of iemand of iets (de Acorn Atom) nog dezelfde is als 
vroeger, Naamsverandering; andere behuizing, andere kleding, het 
doet er allemaal weinig toe, waarin schuilt dan het wezenlijke van 
de Atom? Je kunt eraan sleutelen wat je wil (hardware), maar met 
sof tware veranderingen moet je voorzichtig zijn, anders verandert 
het inneriyjk, het wezen van de computer. Zo heeft hij zijn apparaat 
Factum genoemd (Latijn voors"met handen gemaakt"). Uiterlijk lijkt 
het op een Acorn Atom, maar het gedraagt zich wezenlijk anders als 
Factum, Michel van Leuven ging nog een stapje verder met zijn eigen 
computer, die dermate flexibel is gemaakt dat vrijwel alle voor de 
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6502- processor geschreven software hierin kan “draaien!, dus ook 
VIC=2Oprogramma's, Hij komt tot de conclusie dat de Atom in wezen 
een stuk gereedschap is. Jacy, Mijngheer constateerde dat Michel 
kennelijk aan orgaantranspiantatie doet: het hart van de een, de 
longen van een ander etc, 

Vervolgens werd meer in detail getracht aan te geven waarin nu 
precies het wezenlijke van de Atom school: in de computertaal, in 
de uiterlijke vormgeving (een "ruif" met losse printen, een los 
toetsenbord), in de geheugenindeling, de Atom-sof tware? 
Geconcludeerd werd dat het wezenlijke van de Atom wordt belichaand 
in de Atom-ROM, in zijn eigen(wijze) BAslC-djialect,. 


Vervolgens bracht Jacq. Mijngheer de discussie op de grote groep 
clubleden, die nog gelukkig is met de oude Atom. Dhr, Borghaerts 
voegt hieraan toe dat deze grote groep alleen.kan profiteren van 
de verdiensten van de eerder genoemden (tte wegbereiders), indien 
deze laatsten compatibel blijven, dew.z. overdraagbare software en 
hardware ideëen lanceren, 

Vrijwel iedereen is het erover eens dat de uitwisseling van ideëen 
en resultaten, het elkaar vooruit helpen met de eigen inzichten 
en vaardigheden, dat juist dàt hetgene is dat door onze computer 
club wordt nagestreefd, Dat niemand zich hierbij hoeft te schamen 
voor zijn eigen programma's, hoe simpel ook, spreekt vanzelf. Sa- 
men met de "cracks! vormen we een RIJKS vereniging, waarin vrijwel 
alles mogelijk is! 


Jan Lernout besluit de discussie aldus: 

"Het thema is: "De Atom is geen Atom meer”, maar vol;sens mij is hij 
het nog altijd, 

Wij bestaan nu een jaar als federatie, In het begin werden er vra= 
gen gesteld: hoelang zal dit nog duren? We zijn toch helemaal af-— 
hankelijk van de Acorn-fabriek? 

Maar: wij zijn onafhankelijk geworden. De Atom is van ons geworden. 
Al bestaan er grote verschillen in ontwikkeling,de vriendschap 
blijft bestaan, Als anderen veel verder zijn dan ik, kan ik bij hen 
te rade gaan. Het is een stuk gereedschap, Wij zijn niet te oud om 
te leren," 


Als redakteur van dit verslag sluit ik me graag aan bij de uit= 
spraak van Mevr, Bruins die nij haar aantekeningen van deze discus= 
sie toezonds 

“HEEL HARTELIJK DANK aan de Belgische afdeling en ik denk dat ik 
ook namens de anderen schrijf, Het was in alle opzichten uitstekend 
verzorgd en geslaagd, 

Hopelijk TOT ZIENSSSSEE" 


Ton Otten 


P.8. Tevensmyn dank aan Ed Schijf, die my zijn overzicht van de 
regiec-presentaties toezond, 


INFubBLOh door: PETER EHRL ICH, 


Het programma voor supersnel laden en saven van Atonprogramna's 
ep cassette, zoals beschreven in Acorn Nieuws 4/'83 (3000baud ) en 
Acorn Nieuws 5/'83 (6000 Baua), gebruikt voor het identificeren 
van de geregistreerde datablokken volgnummers, geen namen, Hier- 
door is het noodzakelyk bij elk bandje een lijst bij te houden van 
programma's en bybehorende bloknummers, Raakt deze list na ver- 
loop van tijd zoek, of u vergeet een programma toe te voegen, dan 
zit u in de problemen. 


Het volgende programma INFUBLOK schrijft vóór elk te saven program 
ma een blok met de naam van het programma en eventuele verdere 
toelichting op de band, Dit blok kan gebruikt worden voor het op 
Foy naam" laden van een programma. Ook een GATalogus kan worden « 
gemaakt, die van elk geregistreerd programma de naam en de even- 
tele extra toelichting op het scherm get. 


Het programma INFObLLON heeft een lengte van 3/4 Kbyte en vormt één 
geheel met de taperoutine voor 3000/6000 Baud, Begint bijvoorbeeld 
INFOBLOr op #7pfÉ, dan begint de taperoutine op #73 en eindigt 
op #75EÉ. 


Voor het opslaan van de programmanaam en de overi;se toelichting 
heeft INFOBLOK aen werkruimte nodig vin 1/lhk; na RUN vraagt het 
programma ou het begin-adres hiervan (V-K?). Vervolgens vraagt het 
programmas 3 of uhB ? Antwoord met "6" of "3" (niets mag ook; 

geef t 3KB). Dan vraagt het programma ur/sS/Crt voor LOAD/SAVE/CAT. 
Ingeval van LOAD of SAVE vraagt het programma verder om een naam 
(Ns?) en het beginadres (B:2). ingeval van sAVEN gaat het program- 
ma door met vragen: eindadres (ws?), startadres (512), (deze worden 
door het programma niet gebruikt), bloknummer (BLUKNR? } en eventu- 
ele toelichting. 

Vult u geen eindadres in, dan zoekt INFOBLOK dit zelt op. 


Vervolgens kunt u een toelichting bij het te HAVEN programma intik- 
ken, ken lege string (=RKETURN ) vormt het eirde van de toelichting. 
De maximale lengte van de toelichtin;s is ongeveer 1/lns gaat u 
hierboven dan wordt achteraf de toetichting afgekapt tot 1/&K,. 


Het programma is natuurlijk veel praktischer in EPROM, maar wordt 
alvast gepubliceerd tot "teringhe ende vermaeck" en voor eventueel 
opbouwende kritiek, 


List 
5in,”ver"p:s=pin=S+16 
8in.”3 of 6kb ”$s 
YLl=k165: if? s=6t Lew 16D 
10in.”U/s/c"'ss 
201f?sach" L*or?sech"s":g.a 
25tpaB=p: !paa=0t tHacel 
3OLi, ((?184+3)256+L) 
hOp. #12” ns Pe(p+16) 
5Oq=p+len(p+16) +17 
6Op."b: P&!p'''e: P&kIp'*s: ”48lp'’ 
8Odop, ga’ :gza+teng+isu, ?q=13:g. 25 
100ain.*n:"gn,”b:”b 
110if?sach” L*:g,b 
120820: in,*e:"e 
130ife=0i:q=b:dog=gt+Lenatisu, ?q=255te=q 
140in.®s:”siIp=biptkzeipl8e=s 
150in,“bLoknr”*s:;pl12=s:qgep+16 REM Voor vervolg zie pe 304 
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ton Otten Cees van Driel 
J.A, de Gravenlaan 17 Welcherseweg 220 
2381 TA ZOETERWOUDE 4354 NB MIDDELBURG 


Middelburg, 11-9-1983 


Beste Ton, 


Hierbij stuur ik je een eerste overzicht van de zaken, 
waarmee we in Zeeland bezig zijn; dit voor de rubriek 


BRANDPUNTEN 


In willekeurige volgorde: 


1, Simulatie van processen en geregelde kringen op het 
gebied van meet- en regeltechniek, met nadruk op het 
gebruik van de programmatuur in het onderwijs. 


2. Ontwikkeling van zeevaartkundige programma's, zowel 
voor praktisch gebruik als voor didaktische doeleinden. 


3. Toepassing van de computer in de communicatie: 


- morse-decodering 

- rtty-decodering 

- ontvangst van weerkaarten en satellietfoto's 

= ontvangst van telexsignalen volgens het TOR-systeem 
(= Telex over Radio, dat in de scheepvaart wordt gebruikt) 

- de computer als automatisch alarmtoestel voor het 
registreren van in nood verkerende schepen 

- morsetrainer 


4, Toepassing van de computer in de wiskunde 


a. Ontwikkeling van een goede kleurenkaart 


Zoals ik tijdens ons telefoongesprek heb beloofd, zat ik 
binnenkort een artikel schrijven over de morsetrainer, 

die inmiddels is vitgetest op de zeevaartschool in Vlissingen 
en die mij interessant lijkt voor zendamateurs, die willen 
leren seinen en opnemen. Tevens zal ik dan nog wat kant- 
tekeningen plaatsen bij zaken als morse- en rtty-decodering. 
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18 REM MJCOS SDURCE CODE 21/0E/BE 

20 REM CC) M.M. H.M. JANSSEN 

38 REM BUITENSTEDE 20 

4D REM SUL XB NIEUWEGEIN 

58 DIM A1l,DDE, SSI, XXO: LLEE II1, FF4, GGED, TTO, PP1E 

EO FOR I=0 TO 85: DDI=#EDDDS N. 

70 P.'" “EVEN PROEF DRAAIEN... "&Z1 

80 [=#950D: Del 2E4GOS. 0IGOS. b5P. 4E D=D 

30 FOR I=#9500 TO P-150=0+CI-HG4FEFN #2 IEN. 

100 IF OOFZEEBEDS P," "SOURCE CODE 15 FOUT": E. 

119 P,*’ “assenbieer micos"'? "GEEF BEGINADRES. "5 IM. I 

150 IN.” "AANPASSEN VOOR ROM--I/N'", $A 

158 IF 2A0OCH"J" De 

148 IF PA =CH"J" IN." "GEEF BEGINADREG IN ROM“, 05 0=0-1Ï 

152 P.' “WIL JE EEN LISTING?" tf = SCHERM"! "ZD e= PRINTER" 
1E IN. '"“ (RET) = GEEN LISTING", &A 

178 P‚° "EVEN GEDULD A.U. B. '* 

188 P.$À15 GOS.n3 IF ?A=CH"E" P. &7$E6 

190 IF ?A=CH"1" P, $E 
z00 GOS.b; P?B=-EEs PIl=-hi PI2=-1Ei P2Ze-8 

10 PPL=HLD5 PPS=k4Ds P2E=RDDS PI7=Di D=Z 
0 FOR I=B TO 7 
g P‚* V&R+I, &P?IS Nt O=0iP=P+E: P.'$E$S 
240 P,'“MJCOS STAAT IN HET GEHEUGEN" "EIND ADRES * 
<50 P. "VOOR *SAVE: "EPs END 
zEOb P=l 
=70 B=tEOOZ;s C=ACOi DekC43 E=tC73 F=RCO5 GekCO3 H=#CB; JCC 
200 KetCEs L=kCF3 MesDis N=eHDE5 O=nD5s R=kDEs S=D9; TetDC 
230 U=kFS7E: V=ekBE0Ds W=EFEIEr KXekECi V=kCES Z=kZ0E 
ZOOL 
5i0:DDD LDA Z+1;CMP @EDDE+O) /2SEIBEO DDSISTAHEC: LDA Zi STA&FB 
D LDA ACDDE+OIKHFFILDX DEDDE+DI/ESEF:DD1 STA ZiSTX Z+1 
550 LDA HREGSENE DD45:DDE LDAHFESLDXHFCSENE DDI 
Z40E:DDE LDY WOISTY HiJSR Us INYsCMPAHZO: BER DD25 ECC DDE 

se0 CMPOHESIRCS DDEs:DD4 TAXiLDA PP13+0-49, Xs STA E 

SEO LDA PP1E+0-45, Xs ETA F;+:DDS RTS3:DDE LDX#100, Ys INY5STY N 
570 CPXORZEFBNE XXOsCMPOHSEI BED S505 CMPO#SE: ENE LL@5 CLE 
250 

530:SS0 ROR HIJSR TTU+DSLDAHEAS ENE SSI;LDAOEs JSRHFC4S 
&00:SS1 LDY N5:552 BIT H3EPL 8555 JSR Us CMPAHEEI ENE SS4 
410: 585 JSRHFBIDI:SS4 LOXOLIJSR WiLDX@M:JSR Wi ENE S55 

450 BIT HsBMI S87+1:LDA#1Z4STA L+15LDA#D:STA Mi; LDASE;: STA M+1 
620 LDAABEILDXORCHIENE SSEG:855 BIT Hs EMI SOEILDXOJ 

440 JSR WiBNE SS7;LDA LsLDX L+1::55E6 STA JsSTX J+i 

450:587 LDAAD:STA K5:55B JSR UsCMPOHZC; BED SSI DEY3 CLE 
GEO: S53 ROR Hs INYiJSR FFO+0:SECSROR Hi JSR Us CMPO#D; BNE 552 
470:SS10 LDAIDISTA V+115:5S11 RTS; :s XX JMP CHFEB) 
480 
4SHilt B CMPO#HUS: BEG LEES CMPOHACHBEG LLZ: CMPO#SE 5 BEG LL 
300 CMPAHSISENE XXO5LDRAAD: sLLE LER AsROR A 
518 ROR A;STA Rs; JSRHFBIE:LDXACN; JSR WiLDARFERGENE LL45LDAD4 
SEOiLLE JERKFCASEsLLG SECs:LLS ROR 5 
















asDitLE JSR bEO+UIECG DOilFLuAmdtolÁ Fiell/ Jook Ghl+0 

540 STAHED, XsCPXOIEIBER LLS INXi:LLS CMPOÉDIENE LL7sLDXO0 
SS0:LLS JSR GG1+05STA G+1, XIDEXGBNE LLS: ISR GO1+O:EHIT R 

SEB BVS LLI1SLDA TrBNE LLIEGEHIT SsBPL LLIG:LDVO#FF 

S7O:LLiD INYsLDACG): YrCMPOEDGBEG LL143CMPHED, YiBEG LL10 
SEOiLtit LDYAG: JSRHFISLILDKALS JSRHF Z/EESLDXAJGJSRHF7FIGLDA K 
590 ISRHFSEOEIJSRHFFEDs ELL ie CLCSBCC LLEsrlti5 JMPHFSOFD 
EAO: 14 BIT HiEVC LLISsLDAASIENE LiErstt 15 LDA C+EiBNE LL17 
EIO:LLIE LDA L5STA CGLDA L+15STA G+tsrlti7 BIT S;BPL LL1S:CLC 
EEE ROR S3LDA J+isECMPOHCHSEBNE LLIG 

650 LDA L+1sSTAHIsiLLië JSR IIO+OirLL19 INY:JSR GO1+0 

E48 HIT RsBMI LLZO5STACH), Y5HPL LtZisstLe0 CMPCCD,YSBNE LiiE 
ESDiLL 1 CPYHDAGBNE LLI9IJER GOL+DILDA TiENE LLIEGINC L+1 

E6EB INC ne. TXASBNE LLISFLDA HiEMI LUIZSLDA J+17CMPORCE 

678 BNE LLZZIJMPHCDIBS ELLES LDA RiBNE IILsJMPCJ) 

685\ 

698: 110 LDYAAISTY TsDEYsCLE:LDA M3SBC Ls STARD4ILDA M+1 

708 SBE L+15TAXGBEO IItG:STY#D43:II1 RTS 

718 

7ED:FFO STY NiIJSRHFBEIILDVAOESTY TisFFI LDACG), Ys JORPPO+D: INY 
750 CMPOEDIENE FFisLDXO8r FEE LDA G+1,; X5JSR PPO+OSDEXGENE FEZ 
740 LDA TiJSR PPO+OFEFFE JORHFE715JER IIO+Or FFA INYiLDACH), Y 
758 JER PPO+O:CPYEDAIBNE FFA:LDA TiJSR PPO+D:INC L+15TXA 

760 BNE FEEGINC Kit DY NiRTG 

770\ 

750:GGB STY YiLDYOHEDS ENE GG 

790:GG1 STY ViLDYORFFG:GGE STX XiLDXOAFSECSLDADHLOIAND Bi: STAD 
E03 BEG GOIISHNE GG155:665 CPX E:BCS GO4ILDYOHSOIEITHEROOI 

818 BVC GGEOF:0G4 CPYOHFEISECIENE GGEFRED GG19::065 CPX E 

SE8 BCC GGEsLDYORFF 1656 BEE GG75:007 MOP: 605 LDXOHFCHEOR D 
850 STA D::GG9 BNE GG105:GGI BNE OG155:G011 LDAOFZG 

E4B:GGIE DEXIRIT B5BED GO1iBCH OUI4GGEPX ESBCC GG15 

850:GG15 DEXSBIT BENE GO1Z5EC5 GG1GICPX ESBCC GO155 BCS OGIE 
SEOEL INYsEMI GOZ3REG GG57DEY GOLE is sOOID FOR Di STA D 
ELBE EGIE ROR CDA Uik AsHR Ms dlslurimt Herborn Marki Gul 7 
E50 EOROHAE:F:GGI7 FCC GOtEs1GG1E BTA TiNOPsLDXKaatt Ds: INYs:CPYOE 
890 LDA DsECC G59::GG19 LDX XsLDY YiLDA C;STA#544Di RTS 
00:GEEB CLCIRTS 

iN 

SEO: TTO LDAAHCHISTA V+lisLDAADISTA VS 

350 

34D:PPO PHAISTA CGHSTX XooTY YilDXORFFICLTILDA Vré 

350:PP1 LDAOH4DI PPE RIT VelEFBED PPEGSTA V+IEGBCC PPG 

SEO CPXASIBCT PPEILDX XiLDY Yi PLAERTS 











ZED: PPA INX3BED PPSSSECGROR Ci:PPE PriPiLDAOSEIEES PPEGASL A 
930:PPE STA VrEILDY FiBEÙ PPEIGTY V+7 

1000: PP7 ASL V+EIROL V+7IECC PP7IE:PPE CPXOEFECS PPIDILDA Ù 
1910 ANDOISEOR TiLSR AFBCC PPS COROHAE 

1929: PP3 STA Ti:PPiIJ PLPEJMP PP1+0 

1BSD:PPIE\ 8 BYTES OF DATA 

19401 

1565 RETIJRN 





Een belangrijke zaak voor een computer is de voeding, hoe 
eenvoudig de opbouw ervan, ook kan zijn. Bij een slecht 
werkende voeding kunnen er heel wat storingen optreden 


„= een ín spanning schommelde voeding kan o.a. het uitwissen 
van geheugen blokken tot gevolg hebben ; 
= brom (rimpel) geeft een golvend beeld, dansende letters 


= netstoringen, die over de voeding binnenkomen kunnen IC 
beschadigen of een foutieve "klokking" veroorzaken. 


(zie hieromtrent ook artikels in A.C.=-Nieuws) 


Hierna een zeer korte toelichting omtrent de verschillende 
bestanddelen van een voeding aan de hand van het klassieke 
blokschema. 


BLOKSCHEMA VAN EEN VOEDING 
éransformator buflercond. stabilisatie indikatre 





1. Transformator : dient om de netspanning om te zetten naar 
een lagere waarde en galvanisch te scheiden. 


nadeel : - voor 50 Hz groot en zwaar 
… kan een magnetische veld opwekken dat hinderlijk 
kan zijn voor de randapparatuur. 
soorten : - de klassieke E-kern ; 
- de ringkerntransformator : waarbij de eerder 
genoemde nadelen wat verminderd worden. 
opmerking : de opgegeven spanning bij een transfo is de 
EFFECTIEVE waarde. 


2. Gelijkrichting : zet de wisselspanning om ín een pulserende 
gelijkspanning 


EE ha 


eigenschappen :-gemiddelde diodestroom 100 % (alle 1 gaat 
door de diode) ; 
-rímpelfrequentie ís 50 Hz. 


dubbelfazige 
l. met bruggelijkrichter 


EE d 
met center tap (midden aftakking) 


HK 
ot - da di d4 de 
So ek Je f 





eigenschappen : -gemiddelde diode-stroom 50% van de totale 
stroom 
=rimpelfrequentie 100 Hz ; 
- voordeel : centertap : er zijn slechts 
2 diodes nodig 
= nadeel : transfo js wel duurder 


3, Afvlakking ; 


„ doet dienst als buffer 

- bij enkelfasige gelijkrichting met condensator heeft men 
ongeveer de effectieve spanning ; 

- bij dubbelfasige gelijkrichting heeft men ongeveer de maxi- 
male "piek"waarde Up = U. Na 








C 


Uit TT 


df enkel fazig 





Vit 


— SA nn Á dubbel fasig 


Waarom zijn er bij sommige bruggen condensatoren Parallel 
over de diodes ? d.i, voor TRANSIENT SUPPRESSION (door- 
gang - onderdrukking) : pieken veroorzaakt bij ingescha- 
kelde motoren, dimmers, ballasten van T.L.-lampen , de 
inverse herstelcurve bij gelijkrichterdiodes, inschakelen 
van de voeding. Deze condensatoren zijn voor de pieksp. 
(shoge frequenties) een kleine weerstand, waardoor deze 
pieken over de condensator hun weg vinden en niet door 

de diodes. De diodes worden op deze manier beschermd 

om de maximum inverse spanning niet te overschrijden. 





‚ Stabilisatie 


Een gelijkgerichte spanning is niet constant te houden om 
volgende redenen . 


- schommeling in de netspanning ; 

= veranderende belasting die spanningsschommelingen veroorzaakt 
in de gelijkrichter ; (dit kan ook een verandering geven 
vän de rimpelspanning) 

- temperatuursinvloed die ook invloed heeft op het gedrag van 
de componenten. 


DAAROM STABILISATIE !!! 


Naargelang : 1. Principeopstelling : serie of parallel ; 
2. werkingsprincipe van de stabilisatie 
-= een lineaire regeling van het schakelend 
element : de geleiding verloopt lineair 
van niet-geleiding tot verzadiging ; 
- geschakeld : geleidend tot gesperd van het 
element. (zal ín deel twee besproken worden) 


lineair eschakeld 
seriestabilisatie serie 
parallelstabili- 


satie parallel 

(engelse bena- 

ming)- 

lineair voltage switching regulator 
regulator 





Veronderstel dat de stroom door de belasting (Rj) vermindert. 
Bijgevolg zal er over (R) minder spanningsval zijn. (U) zal 
over (Rj) vergroten maar de basis van de PNP-transistor (T) 
staat op een vast potentiaal. In de emitter sp. hoger dan zal 
de transistor meer geleiden. Hoe groter (I) door (T}) dan (I) 
groter door (R). De spanning over de (Rj) daalt dus en de 

(U) over (Ry) blijft gestabiliseerd. 


Enkel toepasbaar voor kleine belastingen. 


Dit fs de meest gebruikte stabilisatie van de twee. 


Werkingsprincipe : 


Ee referentie 





De emittervolger is hierin herkenbaar. Verkleint de belasting 
dan zal de uitgangsspanning verminderen. De NPN-transistor 
wiens basis op een vast potentiaal staat, krijgt een negatiever 
emitterspanning. Dit betekent meer geleiden —> (1) —- zodat 


de spanning stijgt tot wanneer zich de spanning herstelt op het 
ingesteld niveau. 


Nadelen : - rendement (m) = 40 %äà 50 % 
- indien er een uitgangsspanning, nodig is die niet 
in de handel te verkrijgen is , moet men een 
transfo kiezen met een hogere uitgangsspanning. 


Hierdoor ontstaat er wel een groot vermogenver- 
lies. 


1. 


transfo 8V, geeft gelijkgericht + IV 
uit Uin-Uyit > 12-5 = 7V 
P = Ux I =p 5A > 7x5 =35Watt te dissiperen door de 
transistor 


transfo 12V, dit geeft gelijkgericht * 18V 
uit Uin == Uyjt > 18-5= 13V 

P = U x 1 & neem 5A > 13x5=65Watt te dissiperen door 

de transistor 

Hiervan wordt er slechts 5Vx5A = 25 Watt te gebruikt en de 
rest moet gedissipeerd worden (omgezet in warmte). Is nu de 
voeding opgesteld in de computerkast, of bij de uitbreíidings- 
printen dan geeft dat onnodige verhitting van de componenten 
tot gevolg, 


Opmerking : het verschil van Uin-Uy;t moet zeker ZV bedragen 
voor de goede werking van de stabilisatie 
(transistor of regulator). 


De handelsvorm van een serie stabilisator is de 
VOLTAGE REGULATOR 
Verkrijgbaar ín 5A en meer. 


Principe. 
7, fs 





overstrocm: 
peverl: 1 IG 


beveiliging 


Werking 
Tj is de serie-regulator. 


T2 de overstroombeveiliging over Rs krijgt men een spännings- 
val in functie van de uitgangsstroom. Bij een bepaalde 
gekozen waarde (U=RsxI) Up, = UBE zal de transistor 
T2 gaan geleiden hetgeen 8 transistor Tj beïnvloedt 
en de uitgangsstroom gaat beperken. 

De comparator vergelijkt de referentiespanning met de 
uitgangsspanning, die bij een afwijking de serietransis- 
tor zal bijsturen. (meer of minder doet geleiden). 


Meestal is er ook een temperatuur beveiliging. Wordt de 


chiptemperatuur te hoog dan geleid T3 hetgeen de basis aan 
de massa legt waardoor de uitgangsspanning OV wordt. 


ck (terugloopkarakteristiek) 
dbackcurrent : is de stroom waarbij de intregrated 
circuit (1.C.) terugvalt bij kortsluiten van 


de uitgang. Indien dit niet zou gebeuren zou 23 


5. 


de temperatuur (dissipatie) serietransistor, te 
hoog oplopen en beschadigen. 


Het verschil van Uyst — Uins beneden de regulator bij 
een verdere daling van Uin de uitgang niet meer stabili- 
seert. Deze is afhankelijk van de junctie temperatuur 
(een junctie bij halfgeleiders is het gebied dat zich 
vormt tussen de twee verschillende materialen) en de 
belastingsstroom. 


dit is de stroom gevraagd door de IC welke niet aan de 
belasting geleverd wordt. 


meennesdseszes. 


de verandering in output (uitgang) spanning voor een 
verandering in input (ingang)spanning. 


de verandering in uitgangsspanning, voor een verandering 
van de uitgangsstroom. 


Beveiliging : 


Ì. 


met transistor 


werking : neem aan dat de ín- en uit- 
zekering gang van de stabilisator inwendig tegen 
6v6 elkaar komen, of de serietransistor in 
een gewone voeding komt in kortsluiting 
De spanning zaì gelijk zijn aan de onge- 
stabiliseerde spanning ; indien deze gro- 
ter wordt dan 5V6 (zenerspanning)+0,7V 
(Ube-junctie)=6,4V, de collectorstroom 


heeft de grootorde van de maximum leverbare stroom van de 
transfo. Is er geen zekering opgenomen dan gaat dit door 
tot de transistor rooksignalen geeft. 


Conclusie: de pieken worden begrensd op 6,4V en de 


transistor komt dan in geleiding, die ze als het ware kort- 
sluit. 


met thyristor 


werking : krijgt men een overspanning 
’ door veronderstelde reden van bij de 
geher.ng 


transistor, dan zal de thyrister trig- 

geren bij een spanning van de zener- 
sp. + de triggersp. van de gate (Vg). 
De thyristor is nu een kortsluiting 
welke de zekeríng die opgenomen is in 
de kring doorbrandt. Zo is de schade- 
lijke spanning onmiddellijk verwijderd 
van de computer. 


„=nadeel : bij piekspanning moet er opgelet worden 
dat de thyristor niet triggert, want anders 
zou telkens bij opschakelen de zekering door- 
branden. Daarom de condensator aan de gate 
die een kleine tijdsvertraging tewerkstelt. 


x variant met thyristor 


-nadeel : te traag, relais heeft 
betrekkelijk veel vertraging voor 
het afschakelen van de voeding. 
Dit kan reeds fataal geworden zijn 
voor de 1.C.'s. 


opmerking : om bij deze schakeling toch iets te doen 
tegen de schadelijke pieken, kan men gebruik maken 
van een zo genaamde Ge-MOV. 
Ge-MOV : is een soort zenerdiode die stromen tot 
20 A voor korte perioden kan dissiperen. 


3. met IC. van Motorola type : MC 3425 
beste keus en tevens indikatie van juiste uitgangssp. 


gebruikte termen 


met geweld openbreken van de voedingslijn d.m.v. een thyrís- 
tor. 


mogelijkheden 


- met relais, onderbreken voor of achter de 
regulator (transistor) ; 

- met zekering (=crowbar) ; 

- referentie spanning kortsluiten. 


Indikatie. 


Het is steeds interressant om een indikatie te hebben van de 
uitgangsspanning. Dit laat toe te weten 


-of er in geval van meerdere voedingen, een spanning ontbreekt. 
-of de 5V niet te veel daalt. Anders ontstaan er fouten in 
de logische niveaus. (door te dunne en te lange koperbaan- 
tjes is er reeds spanningsverlies. Komt nu een spannings- 
ving dan is het verschil van de logische 'O'en'l' te 
ein 


Besluit : gezien de gunstige prijs van de LM 3914 is dit de 
beste keus, zoals beschreven in &ektuur van juli/augus- 
tus 1981 


- Rudy GRIJP - A.C.B. 


pin 


FRED Wi 


PROM is een machinetaal besturinssprasramma vaar de EPROM- 
PROGRAMMER uit ACORN NIEUWS 7-EE en 1-85. 
Ten opzichte van het originele BASIC prosramma uit 


PRACTICAL COMPUTING (ACORN NIEUWS 7-82) heeft het de 

volsende voordelen: 

” Het is sneller C GK tezen (1 sec.) behalve bis prosram= 
Meren, daar wurdt de tijd bepaald duor de 58 msec/byte 
die de EPROM nodig heeft vaar het prosrammteren. 

- Het is kompakter ( 5805 bytes ò zodat het seschikt is 
ot lS commande in een Prom te worden oPpseburgen. 

( bivvy. op HEXXK of HAXXX van de schakelkaart,. ) 

Het programma is in Source-code weerseseven met redelijk 

wat toelichting, zodat de “sieutelaars" naar eisen inzicht 

veranderinsern kunnen aarbrensen. 

Na RUN vraast het prosramma am een assembleeradres vanaf 

waar de Obsect=-rode kan worden wesseschreven. 

Dit is tevens het vostartadres van het proseramma. 


Gebruikte zero-pase adressen (hexaderimaal): 
91:94 PROM adres { loopt van #OD08 tot #1Z3D ) 
35,94 RAM adres { loopt van #E4DD tot #S4BD > 
s5 inseleren byte 
36,37 checksum 


COMMANDO’ 5: 

— Blank check 
= Read prom 

—= Checksum 
Verify 

= Write Pram 
— Quit 


OE<NDWE 
Ü 


MELDINGEN: 
INSERT ROM 
SET read 
bp) 


rom inzetten 

Schakelaar op read zetten 
Commando intypen 

Onbekend commando 

PROM is leeg 

eerste adres OO #FF 

PROM = RAM 

eerste adress waar PROM) RAM 
Schakelaar op Pprosram zetten 


ERROR 

BLANK CHECK OK 

BLANK CHECK ERROR ON #0008 
VERIFY OK 

VERIFY ERROR ON #0200 

SET erosram 


PROGRAMMING bezig ( E min.26 sec.) 
READY klaar met prosrammeren/ lezen 
SUM=#0A EE 


berekende checksum 


Opmerkinsen: 

— Vaar het prosrammeren van ZK PROMS moet in resel 610 
LDADÉLB door LDAD#HOE worden vervangen. 

— Om vanaf een ander RAM deel te kunnen werken moet in 
resel 54Q LDABHE4 door LDADHXX worden vervansen: waarbij 
XX het hooeste byte var de nieuwe RAM lokatie is. 


Maarten van Alphen 


26 





0 REM PROMA VE, O 
20 REM AUTEUR: 

30 REM M.P, VAN ALPHEN 

4B REM WIERDEN COV3 

50 P. iz 

68 IN, "ASSEMBLEREN OP"D 

78 DIMVVESGF. N=DTOES 5 VUON=DEN. 

80 F,‚, I“1TUZIP, &Z11PeD 

ZOEF Nett PROGRAMMA INITIALISATIE Ana 

108 LDAD#SS:STAHZUS 

118 LDAAD; STAHBOBE :LDADHCC ; STAHRBAC 

120: VV? ISRHFTD1 GH 

158 PP=#OCGECP+13="PROM PROCESSOR": ! (P+1S) =HEADADROD;P=P+193 € 
14O: WVID JSRYVD: JSRVVI + JSRUVZ4 5 JSRHCDS4 3 JSRHFTD1 sh 
158 $P="INSERT ROM"; P=P+105 €; NOP 

160 JSRHFE34 5 IJSRHCDSG 

LONS COMMANDO INLEZEN met 

zUVIL JSRVVO5 JISRUVI:LDAOHEF s JSRHCDOF 

LDAH1DD: CHPORSL 5 BNEVVEE 

LDAAO: STAHBEBC ;LDAAHSE s STAHLDE s JMPHCHCF 

VVEE CMPOH4EG BEGVVI EG CMPD#SZ ; BEGWV1ESCMPIRSE: BEGVV ZE 
CMPIHSE ; BEQOVV 1 3 CMPORS7 3 BEUVVZG 

JSRVYE ; JISRECDS4 5 JMPVVI 1 

Z4BEVVED JMPVVZE 

2EONS te BLANK CHECK ats: 

EB: VVIE JSRVV] 

2TOEVVIE JSRVVI: JSRVVS:LDADHFF 5 CMP#GS5 BNEUV 14 

280 TSRYVZ:BEOVVI ES JSRUYV1IS: JSRVVIES JMPVVI1 

2MDEVVIG JSRVV1S5 JSRVVES JSRVV1 75 JMPVVI 1 

ZOONttr READ CPIROM sok 

ELO: VVIE JSRVVO 

BrVVIS JSRVVI:ISRVVS:LDYAOILDASISISTACHGE), V 

558 JSRVVEGBEOVVIJS JSRVVZBS JMPVV! 1 

ZaON tte CHECKSUM BEREKENEN wenst: 

SO:VVZE JSRVVA 

EO EVVE7 JSRVV15 ISRVVS 

578 CLC:LDA#9S; ADCHSE ; STAKSE SL DAAD: ADCHS7 : STAHI7 

358 JSRVVE:BEOVVET 5 JSRVVES 3 JMPVV 11 

EDAH VERIFY CPIROM wett: 

GOD: VVE1 JSRVVB 

410: VEE JSRVVI:JSRVVSILDA#GS 

420 LDY9DICMPCHIT), V5 BNEYVEE 5 JSRVV 24 BEDVVE2 

43D JSRVVZ4: JERVVLES JMPVVI 1 

AUBEVVEE JSRVVZLIJSRVVES JSRVV175 JMPVV1 1 

GSA rk WRITE PROM sa 

4E: VV2E JSRVVEI : JSRHFESG ; JSRHCDSÁ 5 JSRVVES 3 JSRVVD: ISRHFEGE, 
470: VVE JSRYVIGLDYBOI LDA HIE) , Ys; STAHEEDDLDADHEC : STAKBEUC 
488 JSRRFEGE: JSRHFEEES JORHFEGE 

430 LDAAHCC ; STAHBEDC 5 JSRVVE; BEUVVISS JSRKCDSA  JSRVV 20 
SOD JSRVVI4G JSRHFES4E JSRHCDS4 3 JMPVV1 1 

SION INITIALIZE ADRESS swt: 

SEB: VVO LDADHFF 5 STAHESOT 

SD LDA2D: STAHII ; STAHTZ; STAHIES STAËTE STAHOT 

540 LDADHE4: STAHS4 1 ISRHFEERS RTG 

SOA WRITE ADRESS mt: 

SEB: VVL LDRSEFF : STAHEGBE; LDARG 1; STAHEEBI ;LDARIZS STAHESOD 
570 LDAAKCE : STAKBEBC LDRAKCC ; STABEBC ; RTS 




















WN, 


mr 





SEO INCREMENT ADDRESS tt: 

SID:EVVE INCHITSENEVVZiINCHS4 

GOD:VVE INCH 3 BNEVV4 5 INCH3E 

E1BEVV4 LDADHIOF ANDERE: RTS 

ETON tte READ BYTE 4m 

EED: VVS LDAIDG STAHBEBE $LDAGKHEC + STOREEBC 

€43 LDA#BEUD: STARSS LDROHCCHSTAHESDC: RTS 

EEONketn P, VERROR! sk 

EED:VVE JSRRF7DI5F5P=HD7 IS EP+L="ERROR "5 P=P475 EC NOPERTS 
ETON P. “BLANK CHECK! sn 

GEOIVVIS JSRHFTDISHSEP="BLANK CHECK “3 P=Pa12s Es NOP;RTS 
EIO Ae P, FOK! maen 

700: VVIE JER#F7DI5H5 $P="OK" 5 PIZ=EHDDI PI ZeOAIP=P+43 EINOPS RTS 
TIOA ette P. “ON H"CADRESS) tok 

TEOEVV17 JSRHFTDIGHG SP="ON H"5P=EP+4S ES NOP 

750 LDA#IEs JSRHFEOL: LDA#SI 5 JSRHFEBZt JSRHCDS4: RTS 

7UON ter P, "VERIFY 0 

7SD:VVZ4 JSRHFTDI IJs EP="VERIFY "5 P=P+73ESNOPS RTS 

TEON tet P‚ PREADYY tok: 

TIBEVV2D JSRHFTD1 5} EP="READY" 5 PIS=RDD 5 PIE=HDAs P=P+73EINOPE RTE 
TED Pe" SUM=H" CSM) tt: 

79B:VVZS JSRHFT7DIsF5 EP="SUM=R" 5 PaP+S55 ESNOP 

E08 LDA#I7; JSRHFOOE:LDAHIE I JSRHFEDL: JSRHCDS4IRTS 
ELDON P. "SET prasram'” Hat 

BLD: VVEL JSRHF7DI IFS SP="SET prasram"s;PI11=7sP=PriEs € 
828 NOP;RTS 

EAB tnt P. "SET read" Ht: 

ESD:VVZ4 JSRHFIDIGFGEP="SET read" 3P28=7P=eP+I5E 

EE@ NOP:RTS 

870 P. “PROGRAMMING! Aat 

BBOIVVES JSRHFTD15F5 EP=" PROGRAMMING" 5 P=P+117ESNOPSRTS 
EIOH EN. s=4 

0D P‚ SE" BEGINADRES=H"ED" "EINDADRES=#"&P? 

318 P. "LENGTE="P-D" BYTES"? 

920 A=85E. 


> TOELICHT IAMG 
INITIALISATIE ROUTINES: 
108 verwijder printer driver 
118 zet BS2E klaar 
128 — 168 display tekst en wacht op toets 
INLEES ROUTINES: 
188 — 138 lees commando en Kijk naar G CQuit) 
<00 reset B5LZ en printer driver, terus naar BASIC 
„18 — 220 interpreteer commando en sprins naar routine 
25 onbekend Commando, display “ERROR” 
48 hulp JMP voor conditionele sprons ) 256 
HOOFD ROUTINES: 
2e8 — 290 blank Check routines commando CH) 
read Cp)ram routines commando (RD 
Checksum berekenen 4 commando (9) 
600 — 448 verify prom routines commando (V) 


GED — 500 write prom routine 5 commando CW) 


SUBROUT INES: 


5-9 — 540 zet zerou-pase #91 — HIT Klaar 


EO — 578 schrijf Pram adres CHI1, #92) naar Prosrammer 


538 — 618 iner. ram (#92,#I4) en prom (HOI, HIE) adres 
EIB — E4V lees byte van praarammer in #95 
EED — BOU tekst output routines 


DERDE GRAADSVERGELIJKING 


Dit is speciaal voor wiskunde maniakken „ Velen kennen wellicht de oplossings- 
metode voor een kwadratische vergelijking . Voor een derde graads bestaat er 
ook een metode ; hiervoor is speciaal het programma 3graad geschreven „ Voor 
de liefhebbers: ook vierde graads vgl. kunnen exact opgelost worden (vraag 
mij niet hoe), men kan echter wiskundig bewijzen dat vgl. met een hogere 
graad dan vier niet meer exact op te lossen zijn.Hiervoor moet men zich beroe- 
pen op benaderingen. 

Goed,beginnen we bij het begin: 

AXT BX 4C*XeDe0 onderstellen we A#O dan kunnen we delen door 

A zodat mits nieuwe definities voor A,B,C,D: 


xouBexÂsCrxeDe0 shierin doen we de substitutie X=Z-B/3 zodat: 


zp 24920 met P=C-B°/3 en Q=2*B°/27-B°C/34D. 
Een tweede substitutie (de Viëta substitutie) ZawW-P/(3*W) ; hiervoor is: 


wojtsqewS-p?/27-0 dit is een tweede graadavglì. in v°, dus : 


w--0/2+ (0 /asp2/27) 1/2 en w=-0/2-(0°/a+P/27) 2 
Dus in principe 2 oplossingen voor de derde macht van W.Aangezien een getal nu 
steeds 3 derde machts wortels heeft (waaronder minstens 2 complex) vinden we 
6 oplossingen voor W ; op het eerste gezicht zijn er dus ook 6 voor Z,waarvoor 
we er echter maar 3 verwachten „ Nu blijkt dat (enkele testen van mij bevestig- 
en dit;dus 't zal wel waar zijn) de Z waarden bekomen uit die voor ce derde 
macht van W in het eerste geval gelijk zijn aan die voor het tweede geval.Dit 
is een gevolg van het verband tussen,Z en W‚.Om ook het geval PzO in te sluiten 
zullen we de tweede oplossing voor W nemen. 3 

Hoe trekken we nu nog de derde machts wortel? Wel stel W =X+iY met 
i de imaginaire eenheid. Noem R de norm en T de fase van W3 dan is dus 
Re(x24v2) 1/2 en Tz=arccos{(X/R) als “20 en 

T=2*Pl-arccos(X/R) als Y<0O „Hiermee zijn de drie waarden 

voor W gegeven door: 


werd /S(coa((Te2*PI*1)/3)sivsin( (T+2*PI*1)/3)  1=0,1,2 


Hieruit dus drie waarden voor W . Dit is echter niet de oplossing!! We moeten 
via Z nog X berekenen . Dit is kinderspel. 

Nu het programma;het programma loopt iets anders af dan hier ge- 
schetst.Dit is een gevolg van het feit dat sommige stappen in een computer 
veel beter op een kortere manier gedaan worden.Maar toch, de draad zit erin‚en 
het moet niet moeilijk zijn de werking te herkennen. 

Programma 

10 REM 3DE-GRAADS VGL!!!H! 

20 REM …etnancersnsaeesten 

30 REM “cuypers frank**® 

40 REM *gagelweg S50***te 

50 REM *B-3583 overpelt* 

60 REM **011/647601***et 

JO REM teveresoeweroesen 

89 P‚,$12 

SO P‚,"3DE-GRAADS VGL!" 

100 p,‚"setsevsensneneeent 

110 P, "OPLOSSEN VAN :'''' 

120 P‚"A*Xt3+B*Xf24+C*X+Da0''' ' 

130 P‚''VOOR A‚,B‚C,D REEEL,'"' 

140 P‚"A<>0 WORDT ONDERSTELD! 1"! 
150aD0 FINPUT"A'"%A;FUNTIL %A<>0 
160 FINPUT"B"%!,""C""%C ,‚""D""%D 
170 %B2XB/KA,KC2ACI KA; KD=KD/%A 29 
180 <P2%C-5B*%B/3 


190 %Qe2/ 27 BKB KB-AB*KC/ 34 GD 

200 FIF XP*XQ=0;FP. '"ENIGE OPLOSSING: "'-XB/3' ; GOTOC 
210 KEKO*LQ/ 4e KP*KP*KP/27 

220 FIF XE)>=0 %Y=0;XXn-AQ/2-SQRKE 

230 FIF XECO %Xa-N0/2;XY=-SQR(-KE) 

240 Ru (KX*AXeKYSLY) 

250 1S=SQRXR 

260 FIF AR-O KR=XR'(1/6) 

270 P=(XX2O AND %Y=0) 

280 IF P XTa0;COTOb 

290 FIF %X=0 XTaPI/2+ (SGN%Y-1)*PI/(-2);GOTOb 
300 FIF %Y>=0 KT=ACS(XX/AS) 

310 FIF %Y<O %T=PI+ACS(%X/A5) 

320bP.''" DE OPLOSSINGEN ZIJN:"'' 

330 9=0 

340 FOR I=Q TO 2 

350 KU=AR*COS((KT+2*1*PIJ/3) ; KV=AR*SIN( (KT+2°1*PI)/3) 
360 AwWaXP/3/(XU*LU+KV* LV) 

370 FP. SU-NW*KU-KB/3, "er 1®"KV KWV 

380 NEXT I 

390CP.*'""20,OP NAAR DE VOLGENDE!" 

400 GOTOa ' 


Een voorbeeldje: geef voor a,b‚c,‚d resp. in 1,-6,11,-6 dan zijn de oplossingen 
(controleer!!) 1,2 en 3.De computer zal antwoorden met: 

2. 00000000+1*-6, 96491931E-10 

1.00000000+1° 3, 49245965E-10 en 

3. 00000000+ 1 “3, 49245965E-10 

Wegens afrondigsfouten bij het berekenen van SIN , COS en ACS 1s het imaginair 
deel niet =O . De kleine waarde ervan (C-10!!!) geeft ons de zekerheid dat ze 
nul moet zijn. 


CUYPERS FRANK 


…… 
„ese. 
….. 


Vervolg van het programma "INFOBLOK" van pagina 15. 


155 $q= jn 

160dog=qgtLeng+1: in, $q:u. ?q=13 
170p?25kba13:pr255u13 

180!ga8=p: !gaax0: Ipacut 

185p.“opn”:Li.kffe3 

19041, ((218+3)4256+3) 
200!#a8=b:!paa=S:Hacest(e-b)/256+1 
210f,g=ito10:swait:in. 

220L1. ((?18+3) 425643) se. 

3OObdolgaBap: !faaz=0: Ipacet 

31O0L1. (lr varsieostr ij 

32Op, $(p+16)* 

330u, $n=k(P+16): !waBmb: lpaanl2tp: Iwacet2ip+l4tp-tp)/256+1 
BhOL1. ((718+5)256+L) : 0. ' ve 
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WAAb OF NIET Wim 


(voorkennie: par. 2.E,4.6,4.5 en B.,7.5 uit Atom handboek) 


Dit verhaaltje probeert enige duidelijkheid te verschaffen An het 
gebruik van de zgn. logische expressie diw.n. een expressie die 


na 
De 


evaluatie uvfwel TRUE (waar) is, ofwel FALSE (onwaar). 
rekenprecisie van logische operaties is vier bytes, waarvan 


ter bepaling van de waarde TRUE of FALSE alleen het laagste byte 
wordt beschouwd. 


in 


de Atom wordt de waarde FALSE gerepresenteerd door 0 en de 


waarde TRUE door eem getal ongelijk aan 0, Na evaluatie van een 
logische expressie wordt de waarde TRUE echter gerepresenteerd 
duor het getal 1. 

Met deze kennis en dje uit het Atom handboek vallen er over het 
gebruik van de lugische expressie de volgende opmerkingen te 


mat. 


er: . 


1. De constructies IF A0 THEN... en IF A THEN... zijn niet 


Eed 


identiek. Als A ongelijk aar nul is dan levert de eerste test 
altijd de waarde TRUE ap. In het tweede geval wordt het law 
tyte van A beschouwd en dat 1e miet alleen G als A gelijk aan 


OG is, maar oat als A=t5t. Bewijs: 
A=O;5DO DO AsAtjrlbArF.Ar. 0 LEE.EID. 7E enz. worden miet 


afgedrukt; wel bij: A=0;D0 DO Asti; A Or. Astt. € 
Bpevafiel beduield on kateperaties uit 


De tekens 8, \ Em zt Ei jn ì 
< ef re tummeeta vtt AND er OR zige teztinit 
J 
£ 





lj 
te voeren op ceiallen. LE 

om Loacrette evpreecses te boppelen. Daartn beetact er ouk geren 
EXOR im ans Haai deze Wort kr je mOert gebr uabt. Aanger ien 
de leugieche ti retent umditt Enpreeties Meli VErweven zijn Ar 
Atom Eau: keer je de cummectives wel door elkaar gebruiken, 
Maar met jee 1e det miet. 

Wari beer te voor het peiantiniële verschil tu 





IF OPHBOOISHE GD AND  PRROODERAC-0 THEN repeat 
Angedeukt 

Het ze jammer dat de & ern AND interr op Gerwlfcde manier worden 
afgehandeld, want dat ie er de Gur raal ven det AND en OK niet 
in cumbimatie met EIF um FUETIL verhrebt megen warden. 


veilen: 





Dee AND 1e genvoudig te € 
FIF ZA'2,5 FIF AAS, THEM, en 

DO DO „3 FUNTIL HASZE:FUNTIL Hf 15 

zijn equivalent met de niet bestaande varttructies: 

FIF KA:T.5 AND LATS. THEM... en 

DO „is EFUNTIL KA=ZE AND ZACI2,S 

De OR ae veel moeilijker: het programma zal duedarnig ge- of 
herschreven murten worden dat OK miet modig is. 





Vele Pesjce bennen de Nil-operetur. Wij bennen die niet, maar 
Hebben die cal rset odio. Ten eerste heeft Fijna elke 
loeieche Oper et ar een cOommlemernt: NETLAEE) 1e hetzelfde als 
An=D maar hevercietn tie MOT(A-D) hetzelfde ale (Ai al 

Due NOT feupr 3 Buhrigven wij ale (etpr.ial 








1 variabele heschoumen 
Eje Gat beummen we de NOT oct 
= SNOT A of A=A:! 





Als we de vaertatelu A aim etn 
dew. & har olleer maas ot 1 
op dere mander werwezelijgten: AT (Reil Tepee 


Dus A wisselt hrer Wam Wu Gite 
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&. De tabel voor de ERUIVALENCE-operetor EOV ziet eruit al 


AR (A EQV B) (A EXOR B) (NOT(A EXOR B)) 


0 û 1 Ö 1 
01 a 1 (8) 
1 0 o Î 4) 
11 1 ls) 1 


Duss A EOV B is hetzelfde als (ArE):1 


7. Logische expressies kunnen ook strings bevatten, maar 
alleen de =-operator toegestaan. De <t-operator kunnen We, 
punt 4, omzeilen: 

IF $AS28B THEN... wordt IF (#A=bH): 1 THEN. … 

Als we strings willen surteren, zouden we ook constructies 
hebben als: 

IF $A:$H THEN... 

Wie hier een elegante oplosattmg voor heeft, mag Ket zeggen! 


IF (u begrijpt bovenstaand etukje)st THEN neem contact op m 


Bram Faot. 


P.S. Bij de um tieg ver de EOUIVALENDE vorure ben Cree) mot 


Es 


dan is 
gezien 


moet er 


et 


vb int 


worden Muerreuerbd det Ô en Bdser betkehonud matten Worden 


aL Berit be Petter Et miet tn debet betse D 
. 





EU He 


schriauven uid ele CA ORO EL. Wilder ve egen ERS or 
ernie der mater we weke awer Cen Â en Bern mt wel 


deter emd CAB ADEEEDEFE of ON. 
Bit GER err Ewart sveteta mel dte ader deal stre Me 
de otk He bemsat Weer AAD rev mb. ed beer irt Louw 





uE 6 





bsten 


Wekt Liet volserniie Brevet ere der me Erkel vonmutstret 

waar & del wel 15 Creer omeen : ie vcommulatzef als 

Arbeid. hah set Pelie Hud Pret deet Ui bhutmsten Et Let 

ot de werst lien: 

As HOORD MARE ER GOOG Glou 

PRINT 82 ANU Boy CH ANN AJ rvd & Bjexth & A) zeelt: 
OGEN GEO OW OG OAD En OMG 
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LIST 


BON M Eid SG 


560 
570 
250 
30 
4680 
410 
4620 
450 
455 
448 
645 
GUT 
&u5 
458 
4E QD 





sx BOOLE FORMULES IN BASILE 

REM 4#EOOLE FORMULES IN BASIC 

REM ##BRON: MINI MICRO JUNI ’82 

REM ##BEWERKT VOOR DE ACORN ATOM 

REM ##DOOR P,H. VAN MOURIK 

REM #+RUITERSTEDE 60, NIEUWEGEIN 

REM #+GEBRUIKT PRINTER (MICROLINE) EN FP. ROM 

REM ##PRINT 1-8 VARIABELEN CA T/M HO 

REM A#EN 1-8 FUNKTIES CP T/M Wot DEZE WORDEN IN PROGRAMMARE- 
REM sGELS OPGENOMEN VANAF REGEL 1210 CHET ZIJN SUBROUTINES) 
REM 

DIM ZE) 3? Z=0i 2! 12052! 5=0 

P.&IZ"1- PRINT TABEL"! "Z- PRINT OPGEGEVEN VARIABELEN"? &IN.N 
H=@ 

IF N=i3IN. "HOEVEEL VARIABELEN"NiG. 170 

H=0 

IN. “TIK AANTAL VARIAHELEN", N, "HEX WAARDE DER VARIABELEN"H 
FIF Hoe 2EN5P." "KAN NIET" 50, 100 

1=8;L=H 

DO Lel 22 TeHKESHeH/ 250, HeDs Hel 

IN. "MAX. 8 FUNKTIESG"M 

GOS. as P. $27SEESLES IHFE=D 

P‚ ELO HEP, NR. 7 

FE. I=1TO Nip,"  "SI+E4EN. SPAT" 

F.I=1TO MsP„$73+1" "iN, 3P.” 

pr i 

F. I=1TO NEP, "eentiN, GP, Sine" 

F. I=2TO MEP. "=on"iN, GPA te" 

L=H 

v=0 

DO GOS. « 

IF Y=2;G. 428 

Pole 

F.I=N TOL S,-15P, Z2IEN. 3P, "1" 

F. I=1TO N 

GOS. C1108+1*10) 

N. 

F.I=1T0 M 

GOS, C1200+1#10) 


U, Ya 

P‚$10E1IO"GEBRUIKTE FUNKTIES ZIJN: "" 

P‚$EsP, “CMOMENT JE)" 4 GOS, a 

bART DO I=l+153U, ?I=4 AND I?1=tBAsI=l+2 
IF I?10OE1:G. 450 

P‚s$I’ 

I=l+L. T+4s U. &I="END" 

P. $5$E 5 END 


47OKIF Y=OiY=tsR. 


680 
650 
500 
518 
520 


55 


X=l 
IF OO NiY=Z 
IF Z?XeisXeX+i5G, 690 


L?X=t 
F‚I=X-1l TO 1 5.-1522I=8iN. 
R. 
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EOBaREM INDIEN GEEN PRINTER: 
E1D REM REGEL 628 RETURN 
E20 P.$2 5 RETURN 

111D A=ZI N-DD ER. 

1120 BeZIiN-10iR. 

1130 C=ZICN-ZER. 

1148 D=ZIIN-E ER. 

115D E=ZIEN-4I ER, 

IIED F=Z7CN-S) IR. 

1170 GEZ? EN-E)SR. 

1180 H=Z20N-7 SR. 

1210 P=A&B:REM AND FUNKTIE 
P.PRIGR. 

G=A&B: 15 REM NAND 
P.G&IiR. 

R=AKE; REM OR 

ij P.R&IGR. 

1240 S=AKE:15REM NOR 

1245 P.S&LsR, 

1250 T=A:B5REM EOR 

1255 P.TRIsR. 

1260 U=A:15REM NOT A 

1265 P.U&LGR. 

1270 vealpaccri ear ep: 1 Nkari) 
1275 P,V&IGR. 

1250 W=A&B 

1285 P. WIGR. 

1200 END 





)1- PRINT TABEL 

2 PRINT OPGEGEVEN VARIABELEN 
21 

HOEVEEL VARIABELEN? 

MAX. 8 FUNKTIES?E 


NR. A B LP @ RS TU vw 
ee 1 a een en a ee ee 

B 0 B ' 0 1 B 181 0 0 

1 84 teit 11 1 8 

2 ti 10 1 0 
3 tt 1e 11 


GEBRUIKTE FUNKTIES ZIJN: 
G=A&B: 15 REM NAND 

R=AIBSREM OR 

S=AIB:15REM NOR 

T=A:BiREM EOR 

U=A: 15 REM NOT A 
V=AIBECTHIIICEN CD2 AN CAE 1) 
WEB 


LR SL Tad ond 





Coe 2 okt 2 mg 





Dat programma produamaernt en af ahmuk varn het  ULEARK 4d Bcmerma 
naar Keuze groot of kleins op peranter,. seen STAR DE 210) 
Het bar jeondere aan dat programma ta echter dat het te 
gebruken as TIJDENS het draaien van een ander programma. 








Het idee 15 als volgta 















t het eerste deel van het programma pragrammeert de VIA 
Celie dan  matuur big wel LEINE LG moet zin ti) za. dat 
deze op gezette tijden een bepaalde routine aanroept, 
WEA CHEHT ha ment cie Werl 1 ry wam mart reen Fale je A a 
stopset. 


Kk In die woutine wordt gekeken of er bepaalde toetsen zijn 
angedmeukt (mameti jk CTRL-BHIET voor wen geote en CTRL T 
voor een kleine afdruk) 











k Is dat miet het geval dan wordt gewoon teruggesprongen 
naar het haafdpraogrmeanma 





Kk Zijn de bewuste toetsen WEL aangedrukt, dan wordt eerst 
de bewuste afbeelding maer beurten tc LUI, WEA WET 
doodleuk naar het hoofdprogramma wordt gesprongen 











de: “toets eem ne” eni kart LE, 15 
normaalgesproken miet. te merbhen dat Met programma \Fassret) 
ZIG 5. Ala de vautine echter 10 het hoge Cgestapelde) 
gebied (HSO) ev.) ntamue een "een 
coster het bo hof je de maoutine 








AAW E 






staat, dam wandelt er za 
std Gts wel mal teak om te zit 
ar niet per ongeluk vat “ge-BREAKed" Hebt) 














ats het programma gebruikt wordt met ancere PG Anma’ Ss dié 
veel) ZERO- page ar gebeu heen b.v. ‘machinetaal ==) 
pellet, )_ Kam dat wel , prabtwemen geven. Dat che escheem 
waarom nogal wat incourante zergpage=adressen worden gebruikt 


nl, cate wan de DISC) 


a eee en eneen me en een UCL ES 





Arae de ER M 
Baljuw 1 
SOZ HL NAALDUTI JH 
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KRK OTR EC PEAF IDF OSL CO nk ak ok 
LIST 


zÖ F.$I2" KKK screen-copy Kx" 

zo P‚°7 "DIT FROGRAMMA PRODUCEERT EEN" 

ZO PF," "HARD-COPY VAN EEN CLEAR4 SCHERM, * 
40 FP, 7YDIT WORDT BEREIKT DOOR EEN "> 

50 PF, “INTERUFTPROGRAMMA. DIT BETE 
Ot PF, “DAT HET PROGRAMMA AAN TE F Er 5 TIJDENS" 
70 PF." DE UITVOERING VAN"? "EEN ANDER PROGRAMMA" 
80 FP, "BEDIENING: "? ? CUEY GELE IN) GOEY ART ) tr 
JO F."ctrlrept ctelshaft"? 

100 FP, GEBRUIKTE ZEROHAGE: HED. . HEE C!j 

LIOREM BEU. .#BF IS EIGENLIJK DISC-WERERUIMTE (tnt: 
10 LINEHFFEEGE BIO 

150 IN. "WAAR CODE ‚(BIJV BSAUO) "WW 
14 DIM WVSO 

150 DIM KEZO 

1460 DIM LL 10 

170 F‚.J=1TOZ0s VVJ=Ws EEJ =Wi LL J=Wi N. 
180 P‚&21 

190 FORI=ITO2; F=W 

200 Bebk24250s CEEED/ Se 

Z1OL 

EROEKKEO \ CINTERUFTROUTINE 3 
250 LDAER40; GTAREBOE; LDA; 5 TAHBEOE « Lo DE 550 AREA ; LDA 
240 STAHRGO7; STAHEBOS; LDAISES START 4; LDA BC; STAHLOS 

250 CLI: RTE 

ZeON < DE VIA 15 NU 20 GEFROGRAMMEERD DAT HIJ OF GEZETTE 

ZON TIJDEN HET FROGRAMMG SEEDS AANKCERT 5 














































2H0 sbEEsLDAHBBO4; STYHEE; GTXBECS DAVEN VAN X & Y 3 
290 LDAREOO 3 CM HE Fil: 4 LIE weemlshatt INGEDRKUILT © 5 
20 LDARROOLsCMPELGLG BEG Fi “io ete} INGEDRKURT 7 5 
ai JMPYY LC “TERUG WAAR HOUFDERIJGEANMNMA 5 
sEFE 
5 LDA#BHOUEsANDE@G4 BEU KEZ \ DAAREIJ UO NOG DE rept 7 
AC JME VVL 
ZO kk 7 
LDABO; STAHBO IME Hit 5 
B LDA&1; STAHEO 
$ sLDYEO C INITIALIZATIE } 
410 LDA STARE ; LDAEHEO: STAHEL 
ie 0; CMR; BEUL 
STARE: LDABHAO; Do TARBE s LDAGHIE ETA HE 
STARE; LDAEI; STAHEA4 
450 JMP LL: 
4AOsLL 1 
470 LDAEHOUS STAHED; LDABH4O; STARBESLDAIERA4C; STA H#EG 
ERD LDAB#40; STAHBF ; LDAGT; BTAREA 
4901 LE 
LOO LDABE; JSR#HFERE  ERINTER AAN 3 
Si LOARLEs JOEHEEF B \ REGELAFSTAND OF 6/72 DNH 5 





220 LDAGR4 Ls JSRHEEFK 
ws LDAB6; JSK HEEFE 





0 N 

TN 

2001 VV& 

O7 LDA ET AHET 

250 LDAEHIE;JSR HFEFE:LDA HEe 3; JER HFEFE: LDABO; JSR #FEFE 
sE ANN CINSTELLEN REGOLUTIE VAD ERENTER 
Bi LDA HE4; JSK VVES 

GL 1 VVE 

&ZO LDABIJG: STAHEBT 

G50  sVVAGLDAEO, STAHES3 LIDYü 

&<t0 s VVS 








50 LDACHEI) Ys AND#EE; SEC: ENE VVI 
ben ELEs rUVis ROLRUES LDAREO: MEEL ENE VVZ 
670 RORHRS; BCC VVIL 

PEEN ROLHES; BEC; ROLABS;  GMPUVIE 

670 :VVII; RULES: CLC; ROLHES 

700 WID 

710 VVE: TYAs CLC; ADCERZU: TAY; —_ CMFERD 


720 ENE VVZ 

7250 UDA#ES: JSR VVLS 

740 LDAHBO; CMERIs ENE VVZ 

750 _ LDA#BS; JSR VV2S; LDARES: JSK VV25 

700 VVI: CLC: RORHET 

PI BCC vv4 

780 CLC; LDA#EI; ADCEI; STA#E!; LDAHEZ; ADCEO 

790 BTABEE: CLC: LDAHB7; ADCEI; STARE? 

BOO CMPERZ 

ELO ENE VVS 

E2O LDARHOD: JSRHFEFR { EINDE 1 REGEL 3} 
ELC; LDAHEI: ADERBE: SGTAREL: LDARET 

STA#ET; INX: CPFXHEE:BEQ VV16 














B: wv 16 


890 LDABR#IE; JSRHFEFE; LDABR40: JSRHFEFE { PRINTER NORMAAL } 
VOO DAS; JSFHIEEFE t PRINTER UIT > 
FLO VV1O 


LDXHERC:LDYHBE; PLA; RTI C TERUGEEREN UIT DE INTERUPFT 3} 





C aVVES IS EEN NAGEMAAN TE HEEFR, DIE ECHTER 
EEN NIET EONTRC TOF HZ, 45 OF HEE 3 
109: VV2E PHA JMF #FFOG 








„ z Wal 

) F‚$1E" “PROGRAMMA IS NU (PASSIEF) " 
107 PF.  VAANWEZIG, AANRC DOOR 

1080 FP," ctrelahift OF ctrirept "77 

1070 FNA EEN break WEER OPSTARTEN "3 lä= 
1100 F2 "MET LINK #78 

1110 END 











dMSTErdam 25 dPfil 1968 
SECTETAN 5 PrESIJENT 




















BMSTETJAM 25 Aff; 1368 
SECPEVAT GS PTEZIAERT RR f TE 
Á me ú nd EAN A 
orakel & me PENIS 

fl bal 

Li De zokand 


eg 
Pe ze 


DEN 











beste mensen, 


om te beginnen een rectificatie, 

In mijr programma 'FORMAT! (Acorn Nieuws nr.4) zitten drie foutjes: in regel 270 
noet LLó vervangen worden door LLS, in regel 280 BPL door BCS en in regel 330 
PMI door BCC, 
Met de gepijbliceerde versie van het programma kan het voorkomen dat een regel 
niet op de printer verschijnt, Onaanvaardbaar natuurlijk. 
Ten tweede: een onduidelijkheid. 
Kondig Ik in hetzelfde artikel het programma ‘OPTILLUSIE' aan, is er nergens een 
lastina te vinden, Ja } 
Ben ik vergeter"een listing mee te sturen of is de redactie (Ton, weet Jij het 
nog ?) vergeten deze te plaatsen 7 Pij deze alsnog een listing, 
Zo, dat 15 [veer vrechtaezet. Inderdaad Î 

Nee! 

Van mijn A-D/D-A converter heb ik tot nog toe geen resultaten laten zien, Dat 
wordt dag wel hoog tijd, 
Òp pag, zien we een printout van enkele golfvormen. De bemonsteringsfrequentie 
bedraaat 2ikHe.Deze beelden zijn geproduceerd via mijn programma ‘DIGIFLOT', 
Dit programma verwacht een stuk geheugen van HO000 tot HEFFF (minder is 
nauwelijks zinvol: met deze snelheid zijn de voor data-opslag bestemde 28kBytes 
in een goede seconde vol) en biedt de volgende faciliteiten: 

* inlezen van een analooa signaal 

* herhaald weergeven van dit signaal 

* herhaald weergeven van een deel van dit signaal (fbytes tot 28keytes) 

* uittekenen van het signaal op het scherm,waarbij de tijdas naar believen 

kan worden uitgerekt en ingekrompen 

* aansluitend dumpen van het getekende signaal naar een printer 
Met dit gereedschap valt een aardige signaalanalyse te plegen, 
Mochten er meer mensen zijn met een ‘vol’ geheugen en een (plan tot bouwen var) 
een converter (bestaat er emig inzicht bij de club wb, de diverse uitbreidingen 
aan onze vommelcomputer?) dan wil ik wel een kopie naar het bandjesarchief 
zenden. 


Mijn stokpaardje: GRAFHICG ! 


236192 punten oplossend vermoaen is voor een goedkope miero al behoorlijk, maar 
ik vond het miet genoeg, 

Op weg naar 512768 punten ben ik voorlopig blijven steken bij Sl2384 dots. Ook 
niet kinderachtig want zo’n plaatje slurpt al 24kByte op, 

Hiertoe heb ik het geheugerngebied van #2000 tot H8000 bestempeld tot 
Gsasi-grafisch geheugen, d‚w.z. je brouwt hier plaatjes, maar in principe zie je 
hier niets van op je scherm, 

Omdat nu die 24 kB@ytes teveel zijn voor het video-geheugen (6kB max.) maar het 
toch wenselijk is om te kunnen zien wat er in staat heb ik via het programma eer 
venster van &kB (jawel, het video-geheuger:) gemaakt op de grote plaat, 

Dit ‘venster’ is voor te stellen als een passe-partout dat de onderliggende 
afbeelding ruimschoots bedekt en waarin in het midden een rechthoekig gat is 
gemaakt ter grootte 2544192 punten, Dit passe-partout nu is in 4 richtingen te 
verschuiven zodat ieder punt op de afbeelding op het scherm zichtbaar te maken 
is (maar niet ieder paar punten tegelijk), Dit principe noemt men ‘windowing' 
Dit alles heeft als beperking dat niet de gehele afbeelding in een keer op het 
scherm verschijnt, maar steeds slechts een vierde deel Hiervan, Er zijn echter 
meerdere voordelen, zoals het kunnen vermenigvuldigen van beeldgedeeltes, het 
verkleinen van de gehele afbeelding naar het scherm zonder het origineel in 
eerste instantie aan te tasten en diverse andere trucs die met woorden 
nauwelijks te beschrijven zijn. 
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Bijbehorend 1s een programma met de volgende mogelijkheden: 
* dim,v, 4 toetsen is het verster (window) in stapjes van 8 dots 
in & richtingen te verplaatsen 
x tekenen van lijnen in 8 richtingen (zie 'DRAW’/Hobbit)met een snelheid 
van naar keuze 10 of 60 dots per seconde 
%* Invoeren van tekst 
* inverteren van het plaatje 
* wissen van het plaatje 
* laden van een 'groot’ plaatje (24kB,) 
* saven van een ‘groot’ plaatje (24kB,) 
* lader van een ‘klein’ plaatje (display: &kEB,) 
* saver van een ‘klein’ plaatje (display: &kB,) 
* aanbrengen van een vaster over het plaatje (en weer verwijderer) 
* aanbrengen van eer kader rond het plaatje (en weer verwijderen) 
* het vergroten van het op het display zichtbare gedeelte van het 
plaatje naar het gehele oppervlak (waarbij dus elk puntje vervangen 
wordt door een blokje van 4 puntjes) 
* het verkleinen van de grote plaat naar het videogeheugen 
* dumpen van het plaatje naar de printer 
* diverse goochelfuncties m.b.v, waarvan beeldgedeeltes 
verhuisd/veranderd/geconbineerd kunnen worden 


Ik heb geen assembler listing ingestuurd daar deze ondertussen een omvang heeft 
van ca.lékByte (en rog steeds groeit), Geassembleerd levert dit ongeveer 
3,SkByte machinecode op, 

Ons Atoompje is best wel snel eigenlijk een two-pass assembly van deze lap 
vergt slechts 27 seconden ! 

Naar verwachting is het programma medio/eind oktober klaar en zal dan ook nog 
gesloten contouren in kunnen vullen met een stippenpatroon in een aantal 
dichtheden, 


De tekeningen zijn geproduceerd door een gewoon BASIC-programma (aets dergelijks 
als op Atomic táp, pag.83), met de standaard FLOT-opdrachten: ik heb alleen een 
machinetaalroutine hoeven schrijven die een puntje set/reset of inverteert in 
mijn quasi-grafisch geheugen en het adres van deze routine in te vullen op de 
adressen HSFE,H3FF, 

Dank aan de ontwerpers van de Atom, 


Het programma 'GLOPE' tenslotte tekent op uw ‘kleine’ scherm van 256192 dots 
een kleine globe, Voordat het programma klaar is zijm 24 minuten verstreken ! 


Groetend , 





lo leat de Atom zijn programma's vast (1200 Baud) En zo ziet een stukje popmuziek eruit : 





ZT 























ABUDERFGHIJKLMHOPORS TUNE 2 
abedefshijklmnoparstuvwxuz 
1234567830!" WEAE&' Cd: KEN 
Testees tE IK>, A? 


RECDEFGHIJKLMNOPORSTUUUR TE 
abcdefahijklmnorpgarstuuvuruyz 
125456 II "HERE C dez: kO 
„edt; +NK, 


JEL MHP 
ik moor 


LURE ALE 


ET TL 
HA 


5 6; 5 
+ Ed un FE: 


- 
Er 
Ll 
FT] 
TI 
LI 
nm 


Demonstratie van emisas moselitkheden van 'SUPFERIDRGN' 


320 


340 
350 
360 
370 


390 
«00 
410 


430 
440 
450 
460 
470 


GLOBE 14/94/85 kaak 


REM GLOBE 14/9/'83 
CLEAR4 


G=128,H=096, KEM COORDINATEN MIDDELPUNT SCHERM 
K=B;REM FACTOR TER VERHOGING VAN DE PRECISIE (NIET K )8!!) 


L=100 

M=5 

N=30 

Sell +MEM;R=GQRK 5, T=StNEN;G=SQK T 

E=30%K,KEM BOLSTRAAL 

REM TEKEN HORIZONTALE CIRKELS 

FOR Az-90 TO 90 STEP 15 
F=X(EKCOS RAD A) 


IF A=90 OR A=-90 THEN U=D;V=D, W=E; GOS. b;G05,a; 


B=0 
WEX(ERGIN RAD A) 
UeZ (F&COS RAD B) 
VEL (FRSIN RAD B) 
GÔS.b 
FOR B=2 TO 3460 STEP 2 
VEL (FxCOS KAD B) 
V=l(F&SIN RAD B) 
GÔS,a 
NEXT B 
rv NEXT A 
REM TEKEN VERTIKALE CIRKELS 
FOR A=-90 TO 90 STEP 15 
W=0 
U=Z(EKCOS RAD A) 
V=l(E&SIN RAD A) 
GOS .b 
FOR B=2 TO 360 STEF £ 
WEX(EKSIN RAD B) 
VEZ(EXSIN RAD A «COG RAD B) 
UFk(EKCOS RAD A #COS RAD B) 
GOS.a 
NEXT B 
NEXT A 
P‚$7$747$7 
meme 
END 


0e 
Or 


ON3 
I IXAN 
» ETL 


ALENA THWHNDOHT 
X NIHL SG)A AI G9(A II GE)X IT GHCK AI 


ú 


S3LAA ZEE 





I=UL ; JEVKM, Ork CT&K- IJ WEN) 
CET (URL -UKM) 24/0+G, D=H4+ IGK (WRS-NK CI 4S) 9/0 
PLOTS,C,D;R. 


T=URL ;, JeVeM; Oek (TeK IJ -WN) 


CET& (URL UM) 04 /O4G; DH IQ (URS -Ni (14) 9 /O 
PLOT4,C,D;R. 


FROGRAMMALENGTE 1033 BYTES 


007 


ú 


A (X-GGt 


0é 


T-X= 
T-X 
TX 


GOT0 r 


0 
09 


A“X"ETLOT 
00T% ONYSAY 
OOTX ONMS AH 

0009 OL 0 


X NIHL OZ)Á AT O£(A AI OZ)X JI OECX AI 
X NAHL GBA II STA II GB)X AI GICX AI 


Os 


À 
X 


0» 


I MOS DL 


ï 


Ed OZ 
or 
0 


Ù 


KERN) 


£B,/L/91 BISNIIIJdO WIN 


8.449 T SISNIITEado De 


DM ME 


Gezichtsbedrog 


Even inhaken op het gezichtsbedrog van Rob van Dort. 
Beelden in elkaar laten overvloeien gaat ook zonder een 


spiegel (ook al een oud kunstje). 


Probeert u maar: zet een doodgewone briefkaart, ansichtkaart 
of een correspondentiekaart op de vertikale lijn. Zet uw 
neus op de kaart en de dobbelsteenfiguren l en 4 zullen 
samen 5 vormen (iets bewegen van het hoofd kan -— net als 


bij de spiegel — noodzakelijk zijn). 


Je kunt op deze manier ook iets driedimensionaal uitbeelden. 


Dezelfde methode en er verschijnt een pyramide met "diepte". 





Ik neem aan (ik heb het niet geprobeerd)dat deze methode 
ook te gebruiken is op het beeldscherm (en uiteraard met 


een grotere kaart). 


Overigens: met de computer kun je ook mooie gezichtsbedrog- 


figuren zichtbaar maken. 


AA 


Voer het volgende programma in. 





14 P.Z12"GEZICHTSBEDROG" * ! 

2 REM JBDEKKER 

39 P."DE BEIDE HORIZONTALE LIJNEN OP " 

4f P."HET VOLGENDE PLAATJE LIJKEN KROM" 

5Á P.“MAAR ZIJN VOLKOMEN RECHT!"; LINK#FFE3; CLEAR4; 
A=128; B=96 


64 Y=192; FOR X= 384 TO -A STEP-32 

TË MOVE A,B; DRAW X,Y: N.X 

84 Y=; FOR X=-A TO 384 STEP 32 

MW MOVE A,B: DRAW X,Y; N.X 

1/7 MOVE Z,48; DRAW 256,48; MOVE #,144; DRAW 256,144; END 


En zo is er nog veel meer te maken op het gebied van 


gezichtsbedrog. Ik heb er nog een paar in voorraad! 


ZWART op WIT: er kan nòg meer met de Josbox 


Voer het volgende (“probeer")-programma in. 


1 DIM Al6; c= 8505; P.Z12" zwart op wit met de josbox'"'* 

2Ö IN."VOER TEKST IN (MAX.16 KAR,-"!! GEINVERTEERD)" 'ZA 

35 P. "WELKE LETTERGROOTTE?" *!!1 GROOT" *!#!2 MIDDELMATIG" *! 

4 IN."3 KLEINER" '*!"4 NORMAAL" M; IF M=l OR M=2 D=# 8648: G.18 
SÛ IF M=3 D= 3CHZ; CG. 


6d IP M=4 D= #9800; G.74 

1 P.Z12: GRMOD; CLEAR M; ?#El=Z 
8 FOR X= C TO D STEP4; IX=el; NEXT 
MW P.ZA; LIJF FFE3; TXMOD; G.14 





J.B.DEKKER 


Acorn Cbmputerclub Overijssel/Gelderland 


A45 


INT wok 









In de MICROLINE 20 printer zit standaard een Karakter asneratar van 
het type SNGERZIË. Met PruUS Si in Stand Ben SE on stand A warden de 
volsende Karakters Seprint: 
rooe HOP — #7E: '‘stardaarg’ ASCII karakters 
- zode #00 — #9F: Srafische Karakters 

z — &DF: Japanse tekens (KANA) 
— HEF: grafische Karakters. 
Loals resos aangegeven in de handteidina van de Printer kunnen we 
deze karaxter=ROM vervarnsen duur zen I=-2/716 (INTEL fabrikaat: Kosten 
za. fl. 15). Dit os een EPROM van EK bvytes die we zelf kunner 
prosrammeren net als de ES55. 








— zode 





De bedoeling van dit atles is matuurtijk om de E4 Japanse tekens te 
vervangen door zinvol lere karakters, Bovendien Kunren we de ASCII 
set IN  oversenstemming brengen met de karakterset van =nze ACORN 
ATOM, dw. Ze de Pivitves die Warden Sepront vaar zoda HSE — #5E 
vervansen door resp. 0 \ 1 nà Coe KUNT zien dat dit op miv 
malhine Al 4S gebeurd). 

Voordat Je je eigen Karakterset kunt maken moet Je natuurlijk eerst 
weten mot de karakters zijn opgeslagen in de Karakter ROM, Het heeft 
mig heel wat moeite gekust om dit Uit Te Vinden. Met behulp var 
onderstaang Pragramma kun ve echter zelf karakters maken zonder te 
Weten noe Ze Worden upgestagen! Het enig wat ve hoeft te doen is 
het Volgende: 

li. Op de zen of andere manier moet ve de innoud van de bestaande 
karakter ROM in het Ssehzusen van je ACORN ATOM zien te krijsen. Dit 
kan De verschillende Manieren: be Va dour het laden van de file 
“Mi -ROM"; het ‘nlezen van de ROM via de proarammer =f via het 
tusservortie dat Werdt gebruikt om U7EE's te lezen, 

Sehrijgf in ieder geval de irinoud van de HN4EZTIG raar cassette! 


2. Run het onderstaande Prosramma. 
Z. Schrijf de zelfgemaakte karakterset weer raar cassette. 


ú. Stop de nieuwe karakterset in een 2716, of iaat dit doen door de 
praogrammeerdienst van de ciub. 


5. Vervang de HNGBZTIE-AUD van je misrutine door Je iaen Z716: en 
kantroierr of de plussen 31 en SE omed staan. 


Toelichting bii het Prosramma, 
Het orseramma saat ervan Uit dat de data van de karakter-ROM in met 
seneusen staat vanaf adres #6400. Indien ruvdis in reesei EO de 


statement Re&C000 vervansen. 


Als je Alies soed mebt insetikt verszhiunt er na net  RUNnen mer 
roaster van 5 bij 7 waarin ve Oe eigen karakters Kunt antwerpen. Ùp 
de piaats aim wordt aangegeven daor een Klein reacathoekde  Cd2 
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ZUNSOr): KU Je uu 





FALEN VerSihiJren dar de SRATiIEbAIK in 
EE OHYUKKEN. NEtmaa!s cit Spatiebalk ind UKken en de Stien verdwijnt 
NEET. Daar nu ar cursor te verplaatsen Kun je oP elke Ssewernste 
Staats men stie laten versahi irnenfuvitvegan. Ben je helemaal tevreden 
met ve 2igen  SeWracht, can Kun Je dit Karakter toe kennen aan wen 
bepaalds Toets, OVersenkaomend met een bepaaiae hex zade. Merk op dat 
"sen SU,p Geplaatst Kan worden OP af TUSSEN a= vertikale Hidnen, 
-Suiherend on sen deut=matrix van 3 miv 7 Kzie fis.7 — 1i van je 
RaNndietid sn). Het iS earn Zu Kk MOSeityk dat de Stippen elkaar 
VENLAPPEN. Ontwerp NE karakters echter zudan:s dat dit Niet 
sebeurt! 

Oak kun Je reeds Destaard karakter oproeper: eventueel 
veranderen an daarna aan zen andere toets (nex zode) toewijzen. 

De vertaling van tuets maar hex cude seschiedt als volet. Het 
Prosramma kan in twee ‘modes! verkeren: ASCII made CA} en Sraphic 
mode CO). Im ASCII mode SeteKkteert het Presramma karakters: die 
overeen Komen met hex KodeS waarvan het hoosste bit DQ Is: de codes 
DO-7F dus. Deze Karakters Komen wvereen met het normale toetsenbord 
Van ve Mah rme, de Ws Ze LEESTEKENS) grute- en Kleine letters. In 
GRAPHIC mode Selekteer je ae Kodes waarvan het hoosste bit=i is. 
Hierom bevinden zieh momenteel de Japanse tekens. Als je b.Y. in 
GRAPHIC mode het Karakter ! OProept, dan Krijg Je het Karakter 
waarvan de KOde Seiijk is aan dië van het uitroepteken (#71) + #8 = 
#A1l. Dit (Ss men KANA karakter CEUILELJe in benedenhiek),. Je kunt te 
Al len tijde averschakelen tussen ASCII en GRAPHIC mode, behalve 
TUSSEN zen Kommandt dat uit twee toetsaanslagen bestaat. Het 
Prusramma start on ASCII mode. Tenstotte de Kommarido’ st 














D (toets) haal net karakter op dat overeenkomt met (toets) 


<returmd haai het karakter op waarvan de hex Kade Î hoeer is 
(volgende karakter) 


N begin met de definitse van een nieuw karakter 


a; (auit) d.w.z. Stop het Ppraaramma 

A szhakel over OP ae ASCII set (bit 7=0) 

G schake; Over oe de GRAPHIC set (pit Zei) 
\ cUrsor omhoog 

/ cursor umiaas 

L 





CUFSAr Paar Links 
cursar naar rechts 
Ken het karakter voe aan Pen bepaalde toets (hex 
zÔd 
(spatie) teken sen St,P oP ue piaats van ce cursar of haai 
deze 
Wes Linverteer Stip). 
Verder Zij rus oPsemerkt dat met verstand: s iS Om het spatie 
Karakter Toe te Kennen aan alte ousebruikte codes, Ivaat deze in zen 





later stadium kunnen worden (nsevuid zender de RCM de moeven wissen! 


19 REM CHARACTER DESIGN ee MIERDIME E32 5/08/ET 
Z0 REM O5 MARTIN JANSSE 
Eô RZM BSITENSTEDE Zo 
ud REY Zeil XB NIEUWEGEIN 
24 Ket Q=sTOP: DerBEFFELSOIG! uekE0C3 
EI Azth 3e 000 HeRsDeliM=di GOS, as X=0s VED GOS, d 
78 DD: LINK OQ 
32 IFPK=ECH"A" GOS, art INK HAS IKE 
20 IFIOK=+0D HĲS, a1G0S, birds Yet 
19D IFPK=CH'A" BeRs REM ASCII 
110 IFPK=0e!"G!' beRrsudd: REM GRAPHICS 
128 IF?PKX=CH"\!" COS. arY=Y+1e;GÖS. #1: GOS, d 
130 IFTKeECH"/" GOS, diYeY-iE3GOS, @s GOS. d 
140 IF?PKRECH"I" GOS. diX=X+Ei GOS. #5 GOS. d 
158 IF?KX=CH"C" GOS. diX=X-Es GOS. #1 GOS. d 
158 IF?K=CH* " GOS. c 
170 IF?PK=CH"YN!" 60S,arX=Di Y=0i GOS. d 
185 IF?kECH"D" P,$IEG END 
198 IFPKECH"C" LINK OsA=s?KiIF ADekED IF ACHEO GOS. f 
2D UNTIL @ 
ZidaCi EAR 45 J=-iìj REM CLEAR SCHERM & TEKEN ROOSTER 
FOR I=40009 7D kOD7E STEP 45 !'I=J5 N,5 ?I=#0D 
FOR I=t5128 TO #970D STEP =003 KI=$#E000: N. 
SHOOOl= bres 'HEDOB=IG 'ROLOD-T 
EDR I=8 TO 53 Xel#i5s MOVE X,05 PLOT 7,X, iis N, 
FOR I=8 TO 71 Yelsi6s MOVE B, Ys PLOT 7,80, Yi: N. 5 RETURN 
Z70bFOR I=0 TO 95 Xel#Ei REM TEKEN AARACTER 
250 TFE 12 C=BP EO I+A) 
290 IF I=8 C=DPrOEREDHEr Hi Ar AARF 
Ze Y=ilk: FOR J=sd TO 65 YeY-ib 
z18 .F van GOS. ct REM DATA IN ROM IS INVERTED 
CrC/Es N.J5 N. 13 RETURN 
ZO MOVE ov; REM TEKEN EEN PIXEL 
T4D PLOT M, 6, ir PLET De 4,0: PLOT M, =5, ii PLOT D, GO 
E30 PLOT M,-3, ii PLOT D, 10,8: PLOT M, -11, 15 PLOT D, 12, 2 
TED PLOT M, B, 15 ZOT Dot, Di PLOT M, =-i, 15 PLOT De, 14,0 
7 M, Do 15 PLOT D,-i4, Bi PLOT M, B, is PLOT DD: 14,0 
Mm, Deli PLAT Ds -lh, 05 PLOT Ms 2,15 PLOT Ds lú,D 
250 PLOT M‚-is 15 PLOT Dr 127,8 PLOT MM, B, 1: PLOT D, in 3 
48 PLOT M‚-i;15 PLOT D, 14:85 PLOT M, 1,13 PLOT D, 80 
418 2LOT M, 15 PLOT D: =&,@5 RETURN 
GEDIMOVE X,Yt REM TEKEN ’CURSER’ (INVERTZER, 
43 PLOT MBE, 75 PLOT D‚&, Bs PLOT MD, it PLOT Ds -ur D 
GZ PLOT Ms O1 PLOT Dr4, Di Ra 
450elf XD XetaiV=Y-iEiIF Y{D Y=DEi R. 3 REM TEST X EN Y 
Ed IF YXO Y=dEiskek- dt IF XID XeBat R, 
470 IF WEA X=OiY=Y+tiEi IF WISE Y=Di A. 
v8d IF Y)3E YeOikeXrD: IF Kub X=Bi R‚ 
432 ZETUAN 





GOS. pi X=DiY=05 OOS. at. Q 
GOS, gs A=zA+1 




















PE] 


ZAOfrOR I=8 TO 55 Cel REM STORE KARAKTER IN ROM-DATA 
EI FOR J=#9600+I TO #63900 STEP -F5DZ 
518 C=O#Zi IF PJEi C=Cti 


550 NEXT 5 
560 IF ICS BPlezEtlead=C 
250 Ir 125 BP LAdrr Zet 

N 






D+AEEET =C 
ZED NEXT 
E78 RETUR 


AA 


GRAFISCH PRINTEN met de Mizraiine 80 
Door : Martim Janssen 


In AN 1.8 stand reeds een pPraosramma om srafisch te printen in 
‘clear 6’, Het onderstaande prosramma Print in mode 1: 2 ZE en 4, nn 
onderscheidt Zich verder in de valsgernde opzichten: 


„älie grafische tekens worden vertaald in de hex zudes S0-9F en 
EO-FF, zodat AQ-DF vrij blijven voor KANA- zf zelf te definieren 
symbolen. 

= btj geinverteerd pPpranten blijft de inhoud van het video seheusen 
onaangetast. 

7 ha het printen Wordt de printer terusgezet naar zijm standaard 
instei lins. 

- het prosramma is onseveer haif zo jans! 


De sebruiksaanwijzing is ornseveer gelijk. Het is viteraard wak 
seschreven volgens de standarisatienorm bit 5 van de 82555. 

Voor de zekerheid nos even dit. Het onderstaand programma print zelf 
nos ri kS: maar senereert een machinecode-erosramma (Cassembler) dat 
Sebruikt kan worder om srafisch te printen. Dit assemblerprosramma 
start oP adres #7000 (eventueel regel EU aanpassen). 

Je kunt het printorcsramma aanroepen met LINKH#7000. Druk na de piep 


5e een Willekeurise toets om het printen te starten. Tik een ’I' in 
als je 'seinverteerd’ Wil printen. Nadat de printer is vitserateid, 
moet evenals bij het Pprasramma van Leendert, nes een CTRL F worden 
gegeven Omdat het beeldscherm iS Uitseschaketd tijdens het printen. 
Dit kan ook auto door reeel 208 te vervangen door: P'4=EDERGEDE: R. 
Tenstotte wil ik er nos oP wijzen dat volgens de fabrikant de ‘duty 
zyalie!” tisdens srafisch Printen maximaal GO% van de ’ character 
orintine duty eycie' mas zijn, Wat ze hiermee precies bedoelen is 
mij Neet duidelisk, Wel Hijkt het mij verstandig um te voorkomen dat 


de printpagina voor het srootste deel zwart is. 


> L. 

18 REM GRAFISCH PRINTEN MET DE MICROLINE 80 

<0 B=kBO0D C=bDs DekOisE=HELIF=kEli G=HES HEHE Kee FFG 

SO DIM LLS:FOR I=0 TO ILL I=EEDDD IN. 

GO P,&Z1;:G0S. zi GDS, zi P. SE "EINDADRES="RP+E3 END 

50 

EOz Pa#7000: C: 

7O:LLE JSRAFDLAGJERHFESAsLDKOOHCMPIHASIENE LLisDEXsiLLi STX H 
80 JSRHF7DI 1]; !P=AIEIRISOEIP! GerEAADID: PeP+73 05 

20 LDA B;ROL As;RDL A:ROL As ANDOE: TAX:LDAHFECF, X: STA DD: LDAORIF 
100 CPXOIIBEG LLZILSR AstLLt STA C;LDADO:STA E:LDADHEDS STA E+1 
11O:LL4 LDAOS:STA F:LDYSO 

isDiLLE LDACE), YiLDXOZ 

tsBiLt7 ASL A;ROR OD, XG ASL FsROR Ge XIDEXSEPL Li7 

148 TYA:SECFADC C5TAYIDEC FiENE LLEILDAOESSTA B+EsLDXEE 
1SO:LLS LDA G,XsEDR HiCMPO#ED: ROR A:SECIROR AIJSR K 

16D DEXGBPL LLE:LDAA0I STA H+L 
170 INC EsBNELLS:INC E+li:Li3 LD 
188 LDX C5INX;TKXA:ASL AsADC E:ST 
153 CMP Ds BCC LL4GJSREF7DIG:; 'P= 
TOD P' GEkEDEAER 


ESAND C5ENE Lt4sLDAGEDIJSR K 
ErL2A E+15ADCADISTA E+1 
“ODIETELB 


pr 





VOORBEELD van GRAFISCH 


PRINTEN in MODE 2 


Zó ziet het scherm eruit, 

Bij het printen is het plaatje 
in de lengte-richting uit- 
gerekt, waardoor de cirkels 
niet meer rond zijn, 

Let op het witte vierkantje 


linksronder, Dit is de "cursor", 


hd hd 
in al al Lal Lalh. 
ke dh dh dh ded 
Fr F3 





Programma’ s KUN se 


= MAKKELIJK  zonverteren naal MIJCOS 
turmaat. Bij net SchaaKkpreogr Ammä 


TÔM CHESS LUKT dit niet, omdat dit 
programma (S wever ligcdt tesan Cilissaal) Kopieren. Dit Pproeramma Kun 
‚ Ien: Ook al Ken Je het besinadres 
CE 70A). Deer aem aantal Wijzigingen aan te brensen in de prosramma 
zode  uat Ket tab zm het Praustamma Te laden vp TOB baud: en 
vervolgens te saven vra MJCOS,. Hiervoor Ja ve als vVolSt te werk: 


Nij 
rt 


Lb 


hiet saerSt laden zn daarna TUI 








1 


i. Laadt het Programma de in.v. Het gebruikelijke #“RUN'CHESS"., Druk na 
het taden oe BRK! 


& 

j=sDDEI0E4C 
S=sECTOF IDD 
'Zes0D3CHBLE 
VIE=#IOLDLE4C 
Melde 
E7E6Jer4 CEAEAER 


Hiermee herstel Je O.a. de Schade die is aangericht door de BRK. 


Se LINK naar MJCOS (bes iradres). 


4. Sehrijf het programma op de MJCOS manier weg door in te tikken? 
*5. "FAST-CHESS" 2509 7C20 27SA: SUOD SEDO 
















Dit erousranma KUn ve ir het vervolg taden met *L, "FAST-CHESS" zn 
daarma vunnen met LINKSI7EA, of ineens met “*R, "FAST-CHESS", Dok Kun 
Je dit Presramma ra zen ERK herstarten vra LINK#HI75A. Het saven en 
laden van de berdstand saat ook via MJCOS, Niet verseten om na een 
BRK opnieuw MJCOS te linken. Veel succes! 

NINDZAEK ZWART DP WIT 

Met de VONSENdE we Ee Een ï NORDPACH recht 

mn 2warte zE Vin. Lede her er 
sat art „le Vr Demi 





martin Janssen 


GROOTMEEST ERS ST RIJDEN 





ZELF EEN SCHASaPRCCRANHA MAAsld 





Teel prograemreurs (gelfs ervaren) schrikken ervoor terug om zelf een 
schaakvrogrenma te naken.De reden is gewoonlijk eltijd dezelfde.Nen 
meent cat men zelf een zeer goed schaker moet zijr om een schaakoro- 
gramra te schrijven.liets is mincer waar. KEN TECIPSCN de programmeur 
van BELLE, (de huidige wereldkarnpioen computerschaat) antwoordde op 
de vraag naar zijn eigen sveelsterkte,"I don't plar chess". 
De enigste vereiste is dat men de svelregels moet Kenren; dit geldt 
voor elk spel wat men wilt vrogramrneren.Le spelregels vindt men in 
elk scheakkoek voor beginners en zijn niet zo ingewikkeld als zij op 
het eerste zicht lijker.Hien kan zich afvragen waarom men zelf een 
schaakprogrenma zou schrijven als er al reeds zoveel op de markt zijn. 
Eierop zijn twee antwoorden. ì)De op de markt zijnde schaakproeraan's 
(vaar de atom) spelen relatief slecht.2)iet zelf schrijven van een 
schaakprogranna is een uitdaging voor het intellect. Ken leert niet 
alleen programmeren maar men werkt aan een probleer cat nooit opgelost 
zel zijn.Een vrocramma dat in elke stelling DE beste zet zal kiezen 
besteat HIET.Zlk programma zal voor verbetering vatbaer olijken te 
zijn en het zoeken van deze verbeteringen vormen weer een wetenschap 
op zich zelf. Het is niet mijn bedoeling | reeds op voorhand de moed 
te ontnemen. Neen intecendeel. Ik wil enkel reer eentoser dat het 
schrijven en verbeteren van een scheaxproeranna een hoebyr kan zijn 
waar nen altijd kan mee bezig zijn omdat men nooit zal Kunren zeggen 
dat het programma af iss de uitdacing zal altijd blijven bestaan. 
Ik hoop dat ik U genoeg het kunnen aansporen on de moed op te brengen 
er zelf aen te berinnen. Om u verder op wee te Lelvpen wil ik nu enige 
antwoorden geven op de automatisch opkomende vragen.“elke teal te 
kiezen? Foe weet de komvuter vear eem stuk staat op het bord? Foe 
weet hij welk stuk het is enz... 

EET _BOED. 





Eet schaeskbord bestaat uit 64 velden.De meest 
voor de handligsende methode is dus een arrar 





van 64 velden. Eiermede is het probleem echter 
niet ovgelost. Het schaaxbord is tweedirensin- 
meal en onze array ééndimensionsal: de velden 
liegen als aet ware ov één rij achter elkeaer. 
u Velâ 42 liet dus onmiëdelijk achter veld EE. 
lo im ZE ei al Ken dient dus rekening te houden met de rand. 
otra zaleinj al 9 

eneen ls 













Eiervoor besteer verschillende methoden! ij 








zullen ons echter Ceverken tot éénsdit voor de 
duidelijksheic.Te gemekzelijkste zethoce is het 


bijvoecen van een ertra rencveld.lit voisters niet Ceaer het vpaerd coor 
zijn “ogelijtheid om over stukien zeen te sprizcen ook over het rend- 
veld zen sprincer, Ve noeten dus twee ranáveléen voor 


o 
zien en can iz dit 
2 X Meldi ge- 
heugennlaetsen. Daar onze errey ééndinersionsal is volstean we net 12C 
veldez daar de velden 29,3C of 39,40 tweemaer 


mensionale arrar. 


fel 

»nrobleer opgelost. ‘ese Lebven Cus een errer zodie ven 1 
a 

l voorzonen in een tweede 


ZET SEREZENEN DER ZETTEN 


Zedel ie 


Eet berekenen der zetten is nu niet zo ingewikkeld meer, Laten we even 
het bord bekijkzen. Eén ster near coven kont overeen met de weerde 10. 
Eén stap línks vooruit met de wearde 9 ern één stap rechts vooruit met 
de waarde ll. Eet is nu niet moeilijk om de weerden voor de andere zet- 
tea de berekenen. Vog een voorbeeld. Het paard heeft wanneer het on het 
midden van het bord staat 2 mogelijke velden weer het neartoe kan.De 
waarden van de paardensprong Koren overeen met de volgende cetallen: 
+12,-12,+8,-8,+19,-19,+21,-21. 

Al deze wearden worden in een tabel geplaatst. Loor de weerde van Let 
stuk op te tellen bij het acres van oorsprong vekont nen het adres van 
eankomst. : 


Fet de adressen alleen zijn we natuurlijk noe ziets.0vp deze adressen 
moeten nog de waerden komen van de stuksen. Welke waarde wij ean een 
bepaald stuk willen geven hengt vollecig van onszelf eaan.De manier die 
ik nu earngeef is slechts een voorbeeld. 

pion = 1; paard =d; lover = 5; toren =4jdeme =5; koning =ó. 

Deer we op elke geheugenplaets één brte kurren ocslaen, en we slechts 

3 bits nodig hebben om de waarde van het stuk san te geven, houden 

we nog 5 bits over on bijkomende informatie op te slaer; zcels de kleur 
ven het stuk; Rokade is nog toegestaen; stuk heeft vewogen etc... 
Samengevat z 

bit 0-2: bevat het type, var het stuk; pion,paard etc... 

bit 3: O= stuk heeftVgespeeld. Iz stuk heeft gespeeld 

bit 4: (enkel voor de koning) O= rokade toegestaan.l= niet toegestaan 
bit 5-6: vrij voor eigen informatie 

bit T:0= wit stuk. l= zwert stuk. 

Lege velden worden ov 0 gezet en de rendvelden op #FF. 

Een progremna dat dus de zetten berekent kan er alzo uitzien. . 
Zoek het bord af near waardem die niet gelijk zijn aan O of # FF (leze 
velden en randvelden). Feert nen een stuk gevoncen test can bit 7 om 

te weten of het eer stuk is van de speler aen zet.Irdien niet can zoekt 


men verder tot het einde van het borá. Is het stuk van de juiste kleur 


kijk dan om welk trpe van stuk het gaat. Zoek in de bijvehorende tebel 


de waarde op die men Lij moet teliez on net ecres van het veld van arn= 
zonst te terekenen. Kijk vervolgens welke waarde op het veld van san= 
konst staat.Is het een leeg veld? een randvelâ? of is het veld bezet 
door eer stuk? Is het een eigen stux of een vijandig stuk? Alle moge 
lijke (legale) zetten worden in een lijst geplaetst.vaarna men hieruit 
een zet noet xziezen en dit is nu het grootste probleem bij computer 
schaak (oek bij het gewone schaak). 


Alvorens hierop in te gaan zullen we eerst een kleine berekening maken. 
Het gemiddelde aantal mcgelijke zetten in een gemiddelde schaakstelling 
bedraact onceveer 35. Dit wil zeggen: wit ís aan zet en kan kiezen uit 
35 mogelijkheden; zwert kan hierop op 35 verschillende manieren antwoor- 
Cen.Laat ons even doorrekenen. 

1) lezet van wit = 35 « 35 mogelijkheden 

2) l°zet wr zwart = 35° 1225 totaal aantel mogelijkheden 


3) 2ozet van wit = 357 = 42875 " " 
4) 2ozet van zwart= 35% = 1500625 " " 
5) Jezet van wit = 35° = 52521875 n 


ad 


5 ziet een enorm aantal mogelijkheden. Als men rekening houdt met de 
toegestane bedenktijd in officiële wedstrijden van 40 zetten in 2 uur 
of een gemiddelde bedenktijd van 3 minuten per zet can betekent dit nog 
dat we per seconde + 29CCCO0 mogelijkheden moeten onderzoeken.Bedenk 
hierbij dat we dan nog maar 3 zetten ver gerekend hebben. 

batuurlijk boeven we niet alle 52521875 mogelijkheden te berekenen. Dit 
voorbeeld dient alleen maar om aan te tonen hoe enorm snel er dient 
gerekend te worder en naar mijn bescheiden mening is een basic program 
na hiervaer te traag.Ik moet dus iedereen die een schaakprogramma wilt 
schrijven aanraden dit in assembler te doen.Clubleden die belangstel- 
ling hiervoor hebben kunnen mij altijd kontakteren. 


eener Vansteenkiste R. mmm 


PROJECT: 80-KOLOMS VIDEO DISPLAY UML. 





Iedereen die de Elektuur van September heeft gelezen zal daarin 
de beschrijving van een SO-bholams VDU gezien hebber. Dit ontwerp 
komt in zeer veel opzichten overeen met het door mj op papier 
gezette idee. Zo veel zelfs dat het mij beter lijkt het helemaal 
over te nemen zodat we een hoop antwitkeltijd besparen. Het enige 
wat we nog zouden kunen toevoegen is de geplande omschakeling 
naar 40- of &A-karakters en de aampassing van de characterset 
indien dit nodig mocht blijken. 

De Elektuur kaart kan matuurlijk niet rechtetreeks op onze bus 
aangesloten worden. We zouden hier een verloop plug moeten 
toepassen, dit lijkt MÀ j echter geen onoverkomelijke 
moeilijkheid. 


Op de print moeten nog enkele draadbruggen gelegd worden in 
verband met de adresdetodering. ledereen kan de kaart dus 
plaatsen waar hem dat het beste uitkomt. 
Mi jn voorstel hiervoor luidt als volgt: 


De CRTC op: HEFFO en HEFF 1 
Het beeldschermgeheugen ops #9800 t/m HOFFF. 


Hiertoe moeten de volgende verbindingen gelegd worden: 


Ingang N57 aan Adreelijn. Ingang MIE aam Adres) in. 





A15 
NA14 
NA1 5 

ALZ 

A11 


moor r 


WAONOZETA U =IOn 
PD 
0 


De CRTC neemt nu door het niet volledig uitdekoderen van het 
adres (A2 en Ai) 8 bytes in beslag. Dit lijkt mij echter wel 
acceptabel. 

NE: Waar in de tabel een 'N" voor de adreslijn staat wordt de 
geinverteerde waarde bedoeld. 


De benodigde driver en initialisatie routimne’s zal ik volgende 
teer behandelen daar ikzelf de kaart nog niet in mijn bezit heb 


en hem dus zeker nog miet kam testen. 


Will Verhoeven 
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SOFTWARE: Type ahead. 


Op sommige computers, zoals de REC ern Commodore machines, is het 
mogelijk om, terwijl de computer bezig is, alvast vooruit te 
typen. U hoeft dan niet te wachten met het intypen van opdrachten 
en andere invoer totdat de ‘computer weer naar het toetsenbord 
kijkt. 
Onderstaand programma verzorgt deze "type-ahead” faciliteit op de 
Acorn Atom. Met timer 1 van de VIA (op het board moet link LKZ 
gesloten zijn) wordt regelmatig een interrupt opgewekt, waarbij 
wordt gekeken of een toets is ingedrukt. Zo ja, dan wordt de 
ASCII-waarde opgeslagen in ween buffer. Als er weer invoer nadig 
is, wordt door een nieuwe OSRDCH routine die ASCII-waarde weer 
uit de buffer gehaald. 
Is de buffer leeg, dan wordt doorgesprongen naar de vorige OSKDCH 
routine die werd bewaard bij het opstarten. 
Verandert na het opstarten de OSRDCH vector (bijv. doordat U 
GRMDD inschakelt), dan wordt automatisch doorgesprongen naar die 
pieuwe routine. U hebt daar dus geen omkijken meer naar! (De 
IRO-service routine controleert eteede of de vector is veranderd, 
en handelt dienovereenkomsetig). 
Omdat de echo van de vooruit angetypte karakters ontbreekt, 
worden een paar toetsen uitgeschakeld (alleen bij vooruit typen). 
Dit zijn de REFT-tovete, omdat je miet ziet hoeveel karakters zijn 
opgewekt, en de copy- en cursortoetsen, omdat je miet blind hunt 
editen. Door de speciale afhandeling van de loct-toets wordt dere 
ook genegeerd. Verder wordt gewacht totdat de ESC-tvets wordt 
losgelaten voordat er karakters uit de bufter worden gelezen. Dit 
om vooruit irgetypte commando's niet in de kiem te smoren doordat 
ESC nog ie ingedrukt. 
Als page mode aanstaat en U reageert na een vol scherm met een 
knormale” toets, dan wordt die vok in de buffer opgeslagen. Als U 
dat niet wilt dan met een van de genegeerde toetsen (COPY, LOCH 
of CURSOR) reageren. 
Hij COS-operaties kur je niet vooruit typen, omdat dan de 
Interrupt uitgeschakeld wardt. 
Als de buffer vol ie, wordt dit aangegeven met een piepje. Verder 
doortypen heeft geen zin, dus eerst wachten tot de computer weer 
invoer nodig heeft en er dus ruimte in de buffer ontstaat. 
De lengte van de buffer kunt U instellen in regel 20 (max.255). 
In regel 950 kunt U het beginadres van de buffer veranderen. De 
buffer staat nu direct achter de object kode. In regel 40 kunt U 
eventueel een ander werbgebied Kiezen (bijv.zero-page HRO e.v.) 
Wilt U het werkgebied direct achter de buffer dan een regel 
toevoegen: 

955 F=Btl 


Het werkgebied, dat. niet door arncere programma's benut mag 
worden, wordt als volgt gebruikt: 


F zaantel karakters in de buffer. 

F+1 :tijdelijthe opslag X en Y registers 

F+2 zinde: naar eerst te lezen karakter in de buffer. 
F+5 inden maar eerste vrije positie in de buffer. 
F+4 :stoetscode laatste toets. 


F+5,Ft&:vector naar oude OSKDCH routine. 
F+7,F+B:indirect jumpadres bij bepalen ASCII-code. 


Kauneld Koers 
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Listing: 


10 REM /// TYPE AHEAD /// V1.2 
20 IN. "RASISADRES (BV. #6000) "O0; H=0D 
ZO L=100; REM LENGTE BUFFER 
40 F=#&21C;REM F T/M F+B WORDEN GEBRUIKT 
SO DIM II9,RR4,TT4; FOR G=OTO19s TIGO; N. 
60 P.$21;FOR I1=1T02;F=0; LC 
TONKENS KNK KK KH 
BO\initialisation 
GON\NEW IRO-SR.,DSCLI, OSRDCH 
100 JSK II6& 
110 LDXÒS 
120: TTO LDA TT1,X;STAHRO4, X 
130 DEX;EKPL TTO 
140\INIT VIA TIMER 1 
150 LDADH40; STAHEBOE; LDADHCOE STAHEBDE 
160 LDADHFF ; STAHEBOA4s STAHEBODS STAHKSOZ 
17ON\ELEAR WORK AREA 
180 LDADO;LDX94 
190: TT5 STA F‚,Xs;DEX: REL TTE 
200 CLI;RKTS 
210:TT1s Js PEIO 2=TTigFerrâsL 
ZZONK KAA AAA RA AE EEA 
2i0\new oscli 
ZAON\AVOID IRG DURING CAT 
230: TT2 SEI 
2460 JSRHFBEF NORMAL OSCLT 
270 CLI;SRTS 
2SON KK RAKEN KOK IH KOEK 
290\new osrdch 
ZOO: RRO FHPSSTX F+] 
ZIONCALLED BY OSFIND (HEFC2S) 7 
S2ON\HIGH BYTE CALLER = #FC 
E50 TSX;LDAHIOE, Xs LDX F+1 
340 CMFOHFC; BED KRI 
SSO\ELSE ENABLE IRD 
360 PLFSCLIs PHP 
Z7ON\HUFFER EMPTY7 
ZBO:RRI LDA FsENE RAZ 
SIONCALL FREVIOUS OSKDCH 
400 SEI; JSK RRA 
ALIONGET EEY NUMBER 
420 FHA; TXA; FHA: TYA; FHA 
450 JSRHFE/IJSTY F+4 
440 PLA; TAVi PLA; TAX FLAG FLP:RKTS 
ASONWAIT UNTIL ESC RELEASED 
ZEOERRE LDAHBOO1 3 ANDDHZOIEED REZ 
A7O\GET ASCII-CODE FROM BUFFER 
A80 STY F+t;LDY F#+2;LDA E‚Y 
ASONWRAFARKOLUND IN BUFFER NEEDEDS 
BOO INY;CPHYaLs ECC KRS DY 
SIOERRS STY F+i; DEC F 
520 LDY F+l;sFLP;SRKTS 
S3O: RRA JME (F+5) 





SION KEEK NN KKK KEKEN KOKEN KEN KH 
SSO\irg-service routine 
560: IIG LDAHBBO4 RESTART TIMER j 
570 TXA;s FHA; TYA; FHA 
SBO\PROTECT AGAINST GRAFHIGS SWITCHING 
590 LDADO; ISKRHFEBS 
GOONSTILL SAME OSRDCH? 
610 LDAH20A; CMFDRROL25EE ENE 117 
820 LDA$ZOEG CMPDRRO/256; BEC 118 
630: 117 JSR 116 
GAC\SCAN KEYEDARD 
650: 118 JSRHFE71; BCS 114 
GEONEKIF SOME SPECIAL KEYS: 
B7ON\LDEK, COFY,ESC, CURSOR KEYS 
680 TYA;LDXD4 
690: 119 CMF TT4,X;BEED 114 
700 DEXSEFL 119 
710 CPFY F+4;3RED IIZ;STY F+4 
J20 JSR II 
ZSONELEEF IF BUFFER FULL 
740 LDY F;CFYOL;ECE 114 
7SO\STORE ASCII-CODE IN BUFFER 
760 LDY F+lsSTA KE, Ys INY 
Z7ONWRAFAKOUND IN BUFFER MEEDED” 
780 CPYALSRCC IIlsLDYDD 
790: 111 STY F4Zs INC F 
BaO; IIS FLA,TAY;FLA: TAXGELAZRTI 
BION\GET ASCII-CODE 
820: 115 FHF;LDXDH17; JSRHFECD 
850 LDAHFEEN, Xi; STA F+7;LDANHFD 
840 STA F+8: TYAs JME (E47) 
85: IIA LDASHFF;STA F+4sHNE II 
840: 115 SSRHFDIAGEMIT IIS 
BZONBAVE OLD DERDCH 
880: 116 LDAH#20A; STA F+5 
B90 LDAHPOR:STA F+& 
SOONNEW OSEDCH 
S10 LDADRROLZ5G; STAHLZOA 
920 LDADRRO/LSO: STAHDOEG KTS 
PEOETTA; Jij 'FEBOROGOTOEG PTAH IE, Fef+D 
DA REMAKE RASA KAAK OK 
950 K=eFsREM BUFFERADRES 
950 N.IsF.$& 
F7 D=, "EDDE VAN HED" TOT HF 
980 P,"RUFFER VAN HEE" TOT H"LE+L” 
SI PF. "OFSTARTEN METsLINER"ED" " 
000 END 

Yb (CC) KRKONALD BROERS &-2-1907 





UITBREIDING TOETSENBORD. 


De standaard Atom beschikt alleen over een (standaard) 
toetsenbord voor de invoer van opdrachten. Om verschillende 
redenen kan het handig zijn over andere manuele invoer 
faciliteiten te beschikken. Daarbij valt te denken aan 
joysticks, numerieke en meer uitgebreide toetsenborden. Voor 
al dit soort uitbreidingen kunnen aanpassingen worden 
gemaakt, Het zou echter handig zijn als we een 
hardwarematige aanpassing zouden maken die zo min mogelijk 
software veranderingen nodig heeft. 


Het toetsenbord wordt uitgelezen met behulp van drie 
poorten; A,B en C van de PPIA (ic 25). Deze zijn 
geadresseerd op respectievelijk £B000, £B001 en £BOO2 (zie 
ATP). Daartoe is het toetsenbord verdeeld over een matrix 
zoals te zien is in het electrisch schema dat bij de Atom 
wordt verstrekt. De laagste vier bits van uitvoer poort A 
maken het mogelijk de lijnen O t/m 9 van ie 26 beurtelings 
laag te trekken, zodat een rij uit de matrix onderscheiden 
kan worden. Met bit O t/m 5 van invoer poort B kunnen de 
kolommen van de matrix worden gelezen. Bit 6 en 7 van poort 
B kunnen respectievelijk de CTRL en de SHIFT toets lezen. De 
REPT toets is te lezen uit bit 6 van poort C, 


Nu zou men zich kunnen voorstellen de betrokken poorten naar 
buiten te halen, maar dan zou voor ieder toetsenbord of 
joystick een extra ic 7445 nodig zijn. Daarom willen wij 
voorstellen: Breng de matrix naar buiten en de lijnen naar 
bit 6 en 7 van poort B en bit 6 van poort C. In fig 1 geven 
wij aan hoe wij ons dat voorstellen. Aan de Atomzijde hebben 
wij een male-connector (pennen) gebruikt. 


Suggesties voor inbouw: 


De connector aan de achterkant van de Atom monteren (wij 
hebben daarvoor de koelplaat vervangen door een groter 
plaatje aluminium met daarin o.a. deze connector.) De 
draden worden op de soldeerzijde van de toetsen 
aangesloten. 

De connector in de (linker) zijkant van de bovenkast (waar 
veel mensen de joystick hebben) en de aansluitingen op de 
soldeerzijde van de voetjes van ic 25 en 26. 


Het gebruik: 


Wil men nu een joystick of toetsenbord aansluiten dan zoekt 
men in de matrix op welke lijnen men nodig heeft, 
Bijvoorbeeld voor de letter A heeft men nodig: rij 6 en 
kolom 3 , op de connenctor pen 8 en pen 17. Verder kan van 
de reeds aanwezige software gebruik gemaakt worden. (Men 
hoef t geen programma's meer te veranderen; sluit de joystick 
op de juiste letter aan.) 


D. Urbaník & L. Veltmeijer (Voor fig.l z.o.z,) 


18 REM 
<3 REM 
38 REM 
48 REM 
50 REM 
EO REM 
78 REM 


Fig. 1 Als plug : 25-polige D-connector 
Nummering op de plug aangegeven. 


HOEDJE 

GERARD AKKERMANS 

FLOATING POINT & VOLLEDIG GRAPHIC-RAM NOODZAKELIJK 
TOTALE TEKENTIJD: 58 MINUTEN! 

VOOR ONGEDULDIGEN: AAN REGEL 128 

TOEVOEGEN "STEP 2" OF "STEP 3" 

INDIEN GEEN JOSBOX, DAN "88 CLEAR 4“ 


E8 GRMOD 

90 P=127:0=93; Z=48 

100 G=EB, Bi XV=h4, BiAR=B. ZE3 KUT. B 

110 APAGHKGEAWEKPAFLT (ZHZ) AF=1. S4PI/XG 


128 FOR 


158 D= 


A=-Z TO Z 
FLT CRHA) AWI Bek. S+SORCKP-KDD ) 


148 M=AtPiN=Q-A 

158 FOR C=-B TO B 

168 KTESORCFLT COH) +AD) HF 

178 SEK CCSINCKTIHARKGINCHUEAT D DVD 


158 K= 


C+M3L=StN 


138 PLOT 15,K,LsMOVE K‚ CL-1)5PLOT 7, Ko, 8 
208 NEXT C 
218 NEXT A 


228 DO; 
238 END 


UNTIL @ 


TIJDMETING 


Hallo, computergenoten! Weer een nieuw onderwerp. Niets sensationeels, maar 
wel leuk. Tijdmeting. 


Het enige dat men moet hebben is de VIA en wat kleine electronische spullen 
Hier volgt het schema. 









GE Suge 
Ad of amdere TUN 


Waarom niet alles aan de A- of B-poort? Gemakzucht! Het is gemakkelijker om 
te zeggen: alle B-lijnen zijn out en alle A-lijnen zijn in (of andersom). 


De LED's dienen voor foutendetectie en als indicatie van waar men mee bezig 
is. 


Het programma werkt als volgt: 

Men tikt RUN en als alles goed gaat brandt de groene LED. Bij verduistering 
van LDR 1 springt de oranje LED aan en het programma begint te tellen. Bij 
verduistering van LDR 2 springt de rode LED aan en stopt het tellen. 

Voor het afstellen van de LDR's gebruikt men regel 550, want deze geeft de 
inhoud van # B800 weer, Men moet wel eerst even de lijnen op input schake 
len door ?#B802 = 0. LDR 1 geeft dan O of 64 en LDR 2 O of 2. Ze moeten 
beiden juist O aanwijzen en bij verduistering resp. 64 en 2. 


Voor het fijn afregelen kan men in serie met de potmeters een instelpot van 
100 ohm hangen. 


Het programma ís erop gebaseerd, dat het steeds telt en zo de plaatsen #80 
t/m # 83 gebruikt. Dan wordt het aantal klokpulsen geteld (regels 490/520). 


Men kan het programma natuurlijk uitbreiden door een aantal metingen te 
doen en dan het gemiddelde te berekenen. 


Wat voor metingen? Bijv. als uw zoon of dochter op school geplaagd wordt met 
de slingerproef, kunt u de stof met behulp van dit programma illustreren. 
Geen goede vrienden met de buurman? Meet eens de snelheid waarmee hij naar 
zijn werk gaat en die waarmee hij thuis komt 

Er is nog veel meer mee te doen. U ziet maar, 


Jeroen Baten. 


P.S. de timing is nog niet geijkt. Maar theoretisch klopt het! 


10 REM Tijdmeting 460 BNE VV1 
15 P.$12 270 LDX #81 
20 £=0 280 INX 
30 !#80=00000000 290 STX #81 
40 ?#B802=0 300 CPX £#FF 
50 ?FB8O3=#FF 310 BNE VV1 
60 DIM VV2 320 LDX #82 
70 FOR F=l TO 2 330 INX 
80 P.$21 340 STX #82 
90 DIM P-1 350 CPX E£#FF 
100L 360 BNE VV1 
110:VVO LDA£#80 370 LDX #83 
120 STA #B80F 380 INX 
130 LDA #B800 390 STX #83 
140 AND £#42 400 CPX £#FF 
150 CMP £64 410 BNE VV1 
160 BNE VVO 420:VV2 LDA £#20 
170 LDA £#40;STA #B80F 430 STA #B80F 
180 LDX £#0 440 RTS 
190:VV1 INX 450 J 
200 STX #80 460 N. 
210 LDA #B800 470 P.$6 
220 AND £#42 480 LINK VVO 
230 CMP £2 430 A=( (2832552255255) +(PHB22255N255) +(PPB12255) 
240 BEQ VV2 +2#80)z21 (let wel: niet #12) 
250 CPX £#FF 500 B=((?F8282552255)+(27812255) +280) «12 
510 C=((?#812255)+?#80) 212 
520 D=(?#80x12) 
530 FP.(A+B+C+D)x1E-6 "SECONDEN ''! 
_ 540 E. 
s-®@ 550 £=0;DO0 P.?#BB00&#42;U.0 
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GELEZEN: Graphics 
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REM SPIRAAL 
CLEAR 4 
P=128;0=91 
„S=0. Lj AN=O 
MOVE P,O 
„T=0; DO 


IF X£Q OR X 
DRAW X,Y 
UTEUT+45 
FUNTIL XT>5 
END 


90 
95 
Rele) 
11 
120 


150 G.9G 
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Xa (BKATKSINCATAZAN) +P) 
YZ (BEATKCOS (AT 4AN) +0) 


VIET 
>255 


OR YZG OR Y5191 THEN ZN=/N+PI/4;GDTO0 120 


xPI 


IF UNEZKPI THEN UT=O;MOVE F,Q 36.100 ' 





OPMERKING VOORAF GHET VERDIENT AANKEVEL ING EEN DATASHEET AAN 
TE SCHAFFEN VAN DE bure2,OPDAT HET VERHAAL 
GEMAKKELIJKER TE VULGEN 15 


DE ACORN 15 MET EEN KLEINE UITBREIDING GM TE "TUVEREN" IN EEN 
FREQUENTLETELLER. DUURDAT DE ACURN EEN DIGETAAL SYSTEEM Is, 
IS DEZE ALLEEN GESCHIKT UM KLUKGUILUEN Ab VERWERKEN, INDIEN WE 
DUS EVENTUEEL EEN SINUS WILLEN VERWERKEN, ZULLEN WE DEZE 
EERST OM MOETEN ZETTEN IN EEN BLOKGULE. DIT 16 EVENTUEEL TE 
REALISEREN MEI BV, EEN 5oö TIMER, UP DET ZAL IK ECHTER NIET 
VERDER INGAAN, 





INDIEN WE DE FREQUEMIE VAN EEN PULSTREIN WILLEN METEN, DAN 
KUNNEN WE STELLEN: f=N/T WAARBIJ P=EREGUENTIE 
N=AANT AL PULSEN 
TEVERSTREKEN TIJD 
HIERUIT KUNNEN WL OPMAKEN DAT INDIEN Wk 1 SEC TELLEN, FN 
ÍN WOORDEN: DE FREQUIM IE VAN KEN PULSTREIN I8 GELIJK AAN HET 
AANTAL PULSEN WELKE IN EEN SECUNDE VERSTKIJKEN, 
(NIET BIJ ZEER LAGE FREUUENS ts) 





OM DE FREUUENTIES TE TELLEN, MAKEN WEE GEKRUIK VAN Die 1, 
DE Fi COUNTER WIRD GEBRUIKT OM EEN PERTUDE VAN 1 SEU ETE Me FEN 
DE Ta COUNTER WORD GEBRUIKT UM HET AANTAL PULSEN TE TELLEN, 


DE REGISTERS VAN DE 6522 








FRBO4=TICL TIMER tT COUNTER LUW 
+H80S=T1CH VIMER 1 COUNTER HIGH 
+B506=T1 LL TIMER 1 LATCH LOW 

+E80/=T IH TIMER 1 LATCH HIGH 
*B808=T2CL TIMER 2 COUNTER LOUW 

E80 P=T2CH TIMER 2 COUNTER HIGH 
FHGORZACR AUXILLARY CONTRUL REGIS 
FEBOC=PCR PERIPHERAL CONTROL REGISTER 
FHGOD= IFR INTERRUPT FLAG REGISTER 
FB8OE=IER INTERRUPT ENAELE REGISTER 


HET HIERBIJ GEGEULN PRIGK MAA Ai Ms 1 Art NLET OW CLM ars Loke rda 
ZIEH DAN UUK UITSTEKEN VOR blut E Xt Mid IN 

EEN VAN Dl BEPERKINGEN VAN DLT PRUGRATMA 1e, DAT Db ENEN 
ZIUHT NIE E BUEN Ur oukhtz MA Heist EN, ER OKIEREDEN Die 1Ú He 
ONNALIJK EUR Lit KEDULTOTEN GET, Dt Hi ikt VER ARDE KING VAN Dt 
SOFTWARE WEL OP Ii VANGEN, 

HIERUNDER NOG EEN TESGTEUHAKE LING, EN bne GLG 1 

DE bEGEVEN (LSTSCHAKEL ING GERT EEN HL OKGULE Milt btn tiek GEELUINE Lt 
VAR LEREND TUEBEN DE 4400 EN AUUUU Hie 

DE APPLLCAT EE AG EEN MOLEL LIKE LD Urd mit bi ACORN rn 
TEMPERATUUR MI Hek TE MAKEN. KEN VAN bk MEL IJK HE tt Vr 

EEN TEMPIERe TUUR Mik (ER 16 bV, EEn UV Brik Ns Tb MAKE re 
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10 REM FREGUEÊENTIETELLER 
20 DIM KEO 

30 HRO=0 

40 P,4a2i 

50 FOR Net TO 2;P=t#2800 
6ÛL 

7 LDAERGOA4 

60 INC#H0 

90 PLA,RTI 

1001 

110 RN, 

120 FOR Net TO 2sbe2Ge0 
130 

146 LDA®O;STAREO 

150 STA#B808;STAERBOP 
160 LDAW#6O;STAEBEOH 

170 LDA@#CO;STAARGHOE 





REGEL 70: 


REGEL 60: TEL HET 
REGEL #0: 





BEGIN INTERRUPT ROUT INE, 
HET INTERRUPTKIT 
AANTAL 
HAAL. ACCU VAN STACK, 


All AF. 





LDAG#G U; STAARGHO4 
LDAGECS; STAFHBO7 
STARRGHIS 

LDAWO; STA#Z04 
LDAW428;STA#Z05 
Ct 


ZA: HEU 


250 LDAFGO 


6 CMPE@Z0; HNEERO 


270 LDAERB0O8;STAAI 


280 LDAFHG09; STAHG2 


29 LDAPOSSTA#B3; STAHB4 


300 RTS 


5101 


320 N;P,$ÓS12 


330 LINK#2B2Û js AtEEFE #81 


340 IF Ast ERE THEN A=0 


340 P.AsP,$13;G, 330 


MET DEZE INSTRUKTIE WORD 
IN HET IER GERESET 


INTERRUPT S 


EN KEER TERUG NAAR 


HET VOR LGE FRUGRAMMA 


REGEL 140: 
REGEL 150: 





ZET HET AANTAL 
VIEMER 2 OP 
REGEL 140: ZET TIMER 1 UP 
TIMER 2 OP PULSE 


FREE KUN MUDE, 


INTERRUPTS OF 0 


EN ZET 
CUUNT ING MODE 


FREE RUN MODE HOUDT IN, DAT TI LEEG TELT UF DE KLOK- 


FREQUENT IE, 


EN DP HET MUMENT DAT 0 BEREIKT WORD, 
DE. TIMER GELADEN WORDT MET DE INHOUD 


VAN DE LATCH 


UP HET MOMENT VAN U WURDT DAARBIJ EEN INTERRUPT 


NAAR DE COMPUTER 
INTERRUPT 
LAAD TT EN DE LATGH VAN T1 MET DECIMAAL 


REGEL 170: 
REGEL 1840: 


ENA E 


GEGEVEN, 
VAN [1 
0000 


20 INTERRUPIS VAN SU0OD (=D m5) MAKEN SAMEN EEN 


PERIODE VAN 1 SEC 


REGEL 190: 
REGEL 200: 


LDEM 
IDEM 
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KElstl. 1017 ZET INTERKUPTUEGCT(R (0 42600 

REGEL 220: IDEM 

REGEL 230: ENABLE INTERRUPIELT VAN DE PROCESSOR 

REGEL 250; CONTROLEER UE DE PER LUDE VAN 1 SEC AL VERSTREKEN 

REGEL 260: IDEM Î5. 

REGEL 270: VERPLAATS Dt ANHUUD VAN Ti NAAR Gl.HkUGENLUKAT IE 
HBI TOT EN MET #84, ZODAT HEI VIA BASIC IS ULT 
TE LEZEN 

REGEL 280: IDEM 

REGEL 290: IDEM 

REGEL 300: KEER TERUG NAAR HAGIG 

REGEL 330: MEET DE FREQUENT LE, EN BEREKEN DAARNA DE JUISTE 
WAARDE, DIS 18 NOOI UADAF VUK Fe NAAR BENEDEN 
TELT, DET HUUDT AN DAT INDIEN t PULS GEÏLELT 15, 
DE INHOUD VAN TV HEEFE 5, 

REGEL. 350: PRINT De FREQUENTIE, EN KEGIN UPNIEUW, 


Fred Appel man 


LIST 
18 REN 
28 REM DRIEHOEK VAN 
SO REN PASCAL 
kô REP 
58 d=BiN=G 
58 C=á2 RM TE ARRAY 
18 DIM ACC, BD) 


B& REM ARRAYS SCHOONMAKEN 
SW FOR Y=8 TO C 
1B3 AIX=B 5 BLP 
iLB NEXT X 

120 BE/Del ; REN 
158 REN D 


1áB GOSUB 348 

158 FOR 7=8 TU 18 

168 GOSUB 218 ; REM TEL OP 

172 GOSLB 348 ; REN PRINT B-ARRAY 
188 NEXT 1 

198 END 


TOP VAN 
RIÈHOEK 


24 

210 REM OPTEL ROUTINE 
228 X=2 

ze IF Nú2=t Kekel 

250 ALBI CAL BIH) 
8 L=l+2 

218 UNTIL X (C-2) 

288 RE 





238 FOR X 

RO BIA ; ASA 

38 NEXT f Î 

320 NEN+L 1 t 

SU RETURN Î 2 í 

0 REN PRINT B-ARRAY 1 3 3 Î 

DQ FOR tat 1 ‘ 6 1 

EB IF Bd PRINT"  "sGOTD 40D Î 5 10 18 i 

SO IF (BIK/10O (1 PRINT * * Ì 6 5 VW 15 6 

BA IF (BI(K/IO (1 PRINT * * í 14 B 35 AU 7 1 

338 PRINT BX 1 8 7 8 í 

ee it \ 1 ° 3 5 Bn 8, „2 si 4 3% 3 1 
’ ® 2 2 2 45 18 

Á2@ RETURN 1 MH B 165 7% 6 MW MA 165 B it 
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Naar aanleiding van het artikel GOLFVORK uit A.N., 2 83 heb ik 
geexperimenteerd met een eenvoudige D/A omzetter (zie schema). 
Een 4 bits digitaal signaal op poort B van de VIA wordt hiermee 
omgezet in een analoog signaal met 16 niveaus,niet nauwkeurig, 


maar voor deze experimenten ruim vobdoende. 2 
Het programma cenereert eerst 2 zaagtand of driehoeksgolven met 
verschillende (of gelijke) frequentie.Deze golfvorm wordt vastgelegd s 
in een tabel op #3A/Q en #3BÔ (r. 100P tot 112P). 9 
3 
Ô REK TOONKUEST 9 
1Û REN GEBRUIKT 4 BITS D/A ONZETTER EN 6522 vi 
2Ò REN ZIE SCHEMA 5 
109 DI LL(5) Tijdens de executie van het a 
11@ FOR Iet TO 2;DIlá P(-1) machinetaal gedeelte worden de - 
120 P.,$21 waarden uit de tabel gesommeerd ij 
130L en door 2 gedeeld (r.15P,160). 2 
140: LL LDYAB1 ; LDXABP Ontsnappen uit het machine programma 3 
150:LL1 LDAR3BÔD, Y kan door op SHIFT te drukken (r.200). „ 
16D CLC$ADCH3AÓD,X; LSRA Experimenteer eens met tabellen van 7 
179 STARBBÔP; NOP; NOP sinusvormige signalen of dit soort vo 
15D DEY;BNE LL2;LDY4#B1 golfvormen: 5 
19P:LL2 DEX;BNE LL3;LDX4BÛ ® 
2OÔLLL3 LDANBOD1 ; AND@RBO (spraak is zo opgebouwd!). u 
210 BRE LL1;RTS Als aan r.18 wordt toegevoegd:DEY, ? 
220} krijg je bij lage freauenties ® 
23 PeS6s;N. zwevlngen en faser effecten. ad 
400 74B8H2= PE : 
41Ô P.ô12 = 
5ÔdaiN."ZAAGTAND (1) OF DRIEHOEK (2) "Q z 
51 Ha id 
520 IF Qe2;G.b 7 
530 IF Qe1;IN."ZAAGTAND/(3) OP N (4) "H ij 
540 IF He3 OR H=4;G.b a 2 
(Doon. mammies 
1000bF."GEEF 2 FREQUENTIES"! : 
1016 P."TUSSEN 109 EN 6009 HZ'"'' Bj e— ® 
1029 FOR Kal TO 2 et 
1030 E=#394p+256eK az) poort B Bte—aak}- u 
104D F.K;IN.* FREQUENTIE (HZ) "F VIA ” 
1050 B=25600/F;KWAF=B BaeK ver 3 
1969 C=B/Q;AG=15/C 
1470 FOR Ied TO C Bie > 
1080 De5(BGAI) FF naar 
1998 IF HOS;E?I=D En versterker 
1109 IP H=3;E?I=15-D GND ie 
1119 IF Q=2;5E?(B=I)eD 
1120 Ne ;N. Eenvoudige D/A omzetter. 


113% LINK LLf;G.a 
Marien van Westen 


ISS IW 


uStuy 


ADA St 


JZ 'SAULUAS 


HAS Es 


LIEFE 


H et computertijdperk heeft een enorme 
omwenteling teweeggebracht op het 
gebied van de behendigheidsspelen. De 
goede oude flipperkast heeft grotendeels 
het veld moeten ruimen voor videospel- 
letjes als Space Invaders (zelf alweer een 
old-timer), Moon Cresta, Scrambler en 
Pacman. Over het algemeen hebben die 
spelletjes de naam nogal geestdodend te 
zijn. Ernstige afstomping zou dreigen voor 
fanaten die dagen achtereen denkbeeldige 
ruimtemonsters uiteen doen spatten. Hoe 
dat ook zij — de computer heeft óók een 
beeldschermspel mogelijk gemaakt dat 
veel eenvoudiger is dan het simpelste vi- 
deospel, dat qua spelregels nauwelijks bo- 
ven boter kaas en eieren uitstijgt, en waar 
de speler desgewenst helemáal niets meer 
bij hoeft te doen, maar waar wiskundigen 
en computerexperts over de hele wereld 
nu al meer dan tien jaar gefascineerd on- 
derzoek naar verrichten. In dit spelletje, dat 
„Jeven” heet, en dat op een eenvoudige 
huiscomputer kan worden gespeeld, liggen 
vragen en misschien zelfs antwoorden be- 
sloten over het bestaan van God, de vrije 
wil van de mens, het groeien en afsterven 
van organismen en maatschappijen, en het 
wezen van ruimte en tijd. 

„Leven” werd in 1970 bedacht door de 
Engelse wiskundige Conway. Het spel 
speelt zich als het ware zêlf, onder toezicht 
van één of meer personen die niets anders 
mogen doen dan de beginstand bedenken 
en daarna de regels toepassen. Het 

„bord” van „leven” is een oneindig raster 
waarvan de vakjes in twee toestanden kun- 
nen verkeren: leeg of vol. We zullen het uit 
praktische overwegingen verder hebben 
over damstenen op een oneindig schaak- 
bord, maar dat is slechts een voorbeeld dat 
door een ander vervangen had kunnen 
worden. Bij het begin („generatie 0”) 
staan op sommige vakjes stenen, in een 
door de speler te bepalen formatie. Dit is 
dan ook meteen zijn laatste bemoeienis, 
want wat er verder generatie na generatie 
met die stenen gebeurt hangt uitsluitend af 
van de drie spelregels. 

Die regels zijn gebaseerd op het begrip 
„aangrenzing”. De acht vakjes „rond” een 
steen worden aangrenzend genoemd, de 
vakjes dus waar hij heen zou kunnen als 
hij een koning bij schaken was (fig. 1). 





Rege! 1: Dood. Een steen die aan minder 
dan twee óf aan meer dan drie stenen 
grenst „sterft” en wordt verwijderd. 

Regel 2: Geboorte. Op een leeg vakje dat 
aan precies drie vakjes met stenen grenst, 
verschijnt een nieuwe steen. 

Regel 3: Overleven. Een steen die aan 
twee óf drie vakjes met stenen grenst blijft 
staan 


EEE 


% aM 
. „ee 
EN 


NB: Deze drie regels worden steeds gelijk- 
tijdig toegepast. En zo generatie na gene- 
ratie, tot in het oneindige. 

Omdat vooral beginnende „leven”-spelers 
nogal eens vergissingen maken de vol- 
gende up. Doe het met echte damstenen. 
Begin met zwarte voor generatie O. Leg lij- 
dens een zel een zwarte steen óp de ste- 
nen die zuilen sterven, maar laat ze nog 
even liggen. Leg witte stenen op de „ge- 
boorte”-velden. Ais alle veranderingen ge- 
controleerd zijn, verwijder dan de dubbele 
zwarte stenen, en vervang de witte door 
zwarte. Op deze manier kunnen een paar 
van de elementaire „leven ”“-gebeurtenis- 
sen worden bekeken 
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In fig. 2 staat aangegeven wat er met een 
paar formaties van 3 stenen gebeurt. Het 
blokje van vier in d blijft eeuwig zo staan. 
eis een eeuwige „oscillator ” (triller) met 
fase 2, wat wil zeggen dat hij na twee ge- 
neraties telkens weer zijn oude gedaante 
aanneemt. 

In fig. 3 ontstaat de „bijenkorf, een verder 
onbeweeglijk groepje van 6 stenen. 






































ntstaat het „verkeerslicht”. 
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Al spoedig ontdekte men een ware schat 
aan „stillevens”, knipperaars en oscillato- 
ren. Hoe simpel „leven” ook is, daarbij 
deed zich spoedig het bezwaar voelen dat 
het construeren van een nieuwe generatie, 
als er meer dan een paar stenen mee ge- 
moeid waren, ingewikkeld en tijdrovend 
kon zijn. Beide bezwaren kunnen onder- 
vangen worden met een computerpro- 
gramma voor „leven”, zoals dat (in BASIC) 
op pag. 29 staat atgedrukt. Het voordeel 
van het op een beeldscherm afspelen van 
een „leven”-contiguratie is dat dat met een 
snelheid kan worden gedaan (bijvoorbeeld 
1 seconde per generatie) waarbij de veran- 
deringen als bewegingen worden waarge- 
nomen. 





De „acht” van hg. 5 lijkt op een 8 en is een 
oscillator met fase 8. 





De duikelaar van fig. 6 keert zich iedere 7 
zetten ondersteboven. 
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Een vondst was het virus” (fig. 7). Plaat- 
sen we in een veld van „4-blokken” één 
nieuwe steen, dan maakt het noga! wat uit 
waar we dat doen. Op a ruimt het veld hem 
in twee generaties spoorloos op, en het 
blijft daarna eeuwig zo bestaan. Maar op bd 
(en op alle symmetrisch overeenkomstige 
velden) is het verhaal omgekeerd. Op gru- 
welijke wijze wordt dan het hele veld vanuit 
het midden weggevreten; na 5 generaties # 
is er niets meer van over. (Zie beeid- 
schermfoto's.) 


nt herstel: 32 generaties 
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In fig. 8 kruipt een „hooimachine” langs 
een oneindige diagonaal van stenen om- 
hoog, en hij laat ze netjes in „schoven” 
van 4 achter. Duidelijker en eenvoudiger 
nog Is de beweging in fig. 9. 


en 


De groep van vijf, „zwever” genaamd, ver- 
plaatst zich op eigen houtje iedere 4 gene- 
raties één vakje naar rechtsonder. Eeuwig 
zal hij doorvliegen. Dat doet aan een ruim- 
teschip denken, maar hij is lang niet het 
enige. De formaties in fig. 10 reizen per 
vier zetten steeds twee velden naar rechts, 
en laten daarbij steeds een „vonk” in de 
lucht achter die na één zet verdwijnt. 
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Grotere ruimteschepen zijn door de gro- 
tere rommel die ze achterlaten niet moge- 
lijk (die rommel gaat het schip aantasten — 
als dat eens met uitlaatgassen kon!), maar 
topspelers ontdekten dat het wél gaat als 
we ze laten escorteren door kleinere ruim- 
teschepen. In fig. 11 staat zo’n konvooi. 












































































































































temand construeerde zelfs een ruimteschip 
van 100 stenen, dat geëscorteerd door een 
vloot van 33 kleinere ruimteschepen, eeu- 
Mis over het oneindige schaakbord verder 
vloog. 
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Inderdaad fascinerende mogelijkheden en 
het bewijs dat Conway zijn drie regels 
goed bedacht had. Want „leven” is geen 
toevalstreffer geweest al zou men dat door 
de eenvoud van die regels denken — pas 
na tang proberen vond Conway de goede 
regels die de configuraties niet te snel lie- 
ten uitsterven of aangroeien. Dat zou het 
spel oninteressant of onoverzichtelijk heb- 
ben gemaakt. De gelijkenis die met het le- 
ven zélf ontstaat is evenmin toevallig, maar 
juist Conway's bedoeling. Sommige groe- 
pen zijn levensvatbaar, andere stabiel, 
weer andere sterven uit — net als mense- 
lijke culturen. 

Werkelijk fantastisch werden de ontdekkin- 
gen naar aanleiding van een weddenschap 
van Conway, overigens slechts om 50 dol- 
laf, maar het ging natuurlijk om de eer 
Conway veronderstelde aanvankelijk dat 
geen enkel patroon eeuwig kon groeien 
Een groep wiskundigen van het beroemde 
MIT, het Massachusetts Institute of Tech- 
nology in Boston in Amerika, het zien dat 
dit wel degelijk mogelijk is. Ze construeer- 
den het „zwever-kanon” van fig. 12. 
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Dit is een oscillator met fase 30, die tijdens 
iedere cyclus één zwever afvuurt. Er ko- 
men dus eeuwig groepjes van 5 bij. Con- 
way was zijn 50 dollar kwijt en een enorme 
aanwinst voor zijn „leven” rijker 

Dat seuwige aangroeien gau! overigens 
niet door als op de juiste plek een „eter” 
wordt opgesteld. Dat is een oscillator met 
tase 15 die ondertussen zwevers verzwelgt 
zonder dat er iets van te merken is. (Zie de 
beeldschermfoto's.) 





10 


Er zijn ook „pingpong-batjes” die zwevers 
eeuwig naar elkaar toe kunnen kaatsen en 
prachtige effecten kunnen ontstaan wan- 
neer zwevers en/of ruimteschepen met el- 
kaar botsen. Soms blijft er dan in het ge- 
heel niets over. Maar je kan een paar zwe- 
ver-kanonnen ook zo opstellen dat hun 
botsende zwevers samen een fabriek bou- 
wen waaruit om de 300 generaties een 
ruimteschip wordt gelanceerd. Soms vor- 
men die zwevers samen een kanon dat op 
het oorspronkelijke kanon begint te schie- 
ten. Fig. 13 is van iets dergelijks een be- 
trekkelijk eenvoudig voorbeeld. 





Er vliegen hier 13 zwevers op elkaar af die 
bij generatie 75 een zwever-kanon hebben 
gevormd dat vervolgens om de 30 genera- 
ties gen zwever afvuurt 

Hoe simpel de regels van „leven” ook zijn 
=@r zit Zoveel in dat wiskundigen nu, meer 
dan tien jaar na het bedenken van het spel, 
nog bezig zijn de raadselen en mogelijkhe- 
den ervan op te lossen. Er heeft zelfs enige 
tjd een Internationaal tijdschrift voor „le- 
ven” bestaan. 

Het spel appelleert niet alleen aan het ge- 
voel voor wiskundige schoonheid, maar 
ook aan een paar diep-menselijke gevoe- 
lens. Zo heett het feit dat iedere generatie 
geheel bepaald wordt door de vorige en 
door niets anders een sterke overeen- 
komst met de natuurwetten — ook daar kan 
iedere nieuwe situatie in principe geheel 
berekend worden uit de vorige. Kan de 
vrije wil van de mens dan bestaan? Hij 
wordt immers geregeerd door natuurwet- 
ten? Het antwoord is dat „vrije wil” uitslui- 
tend bestaat in de ogen van de „willer”. 
Zolang je voelt dat je een vrije wit hebt, 
heb je die. Volgende vraag: kan dan ook 
een „zwever” van Conway uit vrije wil 
zweven of zo'n hooimachine hooien? 

Wie over die vraag doordenkt zal een ver- 
rassende ontdekking doen. Conway's „te- 
ven” is een uitermate simpel spel. Zonder 
aan het wezen van dat spel iets te verande- 
ren kunnen we het ingewikkelder maken. 
Met de computer zijn nooit configuraties 
van meer dan hooguit een paar honderd 
stenen onder zocht. Maar get er sens tien 
miljard (het aantal zenuwcellen in het men- 
selijk brein) neer, of nog veel meer. Neem 
in plaats van een schaakbord een drie-di- 
menstonaal raster, en definiëer in plaats 
van 8 „aangrenzende” vakjes honderd of 
een paar duizend als zodanig (dat laatste is 
het aantal verbindingen van de gemiddelde 
menselijke zenuwcel). Neem tenslotte in 
plaats van twee, honderd toestanden 
waarin die vakjes kunnen verkeren. 


Dat het spel zich dan oneindtg veel inge- 
wikketder presenteert zal duidelijk zijn. Het 
is onmogelijk te voorspellen wat er dan ge- ledhadhad 
beurt. Zouden we op die manier niet een hdi 
soort brein hebben geschapen dat alleen 
maar hoeft te worden aangezet om eeuwig 
door te blijven krioelen? In wat zou dat ge- 
krioel dan eigenlijk nog te onderscheiden 
zijn van het gekrioel van elektronen in onze 
hersenpan? Zou er dan niet sprake zijn 
van een wezen dat echt leeft, en zou de 
bedenker van de regels waar het aan ge- 
hoorzaamt dan niet God moeten worden 
genoemd? Zou zo'n wezen niet wanhopig 
bezig kunnen zijn met een poging te ont- 
dekken hoe die regels eruit zien waarnaar 
hij luistert, én naar degeen die ze bedacht 
heeft? 
Met andere woorden: wie zegt dat wij men- iddhdddd 
sen niet een rommeltje van „damstenen” 
zijn die op het raster van een of ander „le- 
ven” -spel aan onduidelijke regels gehoor- 
zamen? 
Een van de belangrijkste ontdekkingen van 
Conway's „leven“ is misschien dat tegen 
deze redenering niets in te brengen is. Een 
tegenwerping zou kunnen zijn dat volgens 
ons gevoel tijd en ruimte vloeiende zaken 
zijn tussen de delen waarvan geen gren- 
zen bestaan. Maar net zoals men heeft ont- ee on on ve 
dekt dat de energie op basisniveau uit 
quantums bestaat, zo is het heel goed 
denkbaar dat dit met tijd en ruimte ook het 
geval is. De mens is heel goed voorstel- 
baar als iets dat een (groot) aantal hokjes 
vult — een discontinuê ruimte inneemt. Be- 
weegt hij, betekent dat niets anders dan 
dat er andere vakjes gevuld worden. Zo'n 
beweging gaat dan met een sprong — zoals 
de wijzers van sommige klokken, of de 
beeldjes van een film dat doen. Als die 
sprongen klein zijn, zou aan niets te mer- 
ken zijn dat de tijd geen vloeiende bewe- 
goo is, maar een discontinue. 

voor tijd en ruimte dus een gquantum- 
theorie? Het zou schitterend zijn als een 
veredeld boter, kaas en eieren zo'n re- 
volutionair nieuw inzicht zou hebben ver- 
oorzaakt. 
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IREMconway transtormat ie 
2REM PROGRAMMA U. P.EHRLICH 

18 DIM A1192,B1198,C176 

11 DIM LL26,PC-1) 

29 F.N=OTO26iLLEND=P IN. ;P. $21 

30 Q=P;5GOS.b;P=Q;GOS.b iP. $6 

48 F‚N=A TO A+1198 S.4; ONZEN. 

45 F‚.N=B TO B+1198 S.4;?N=0N. 

58 P.$S30;CLEARG 

68 P. "GEBRUIK TOETSEN A 2 <>)" 

2a P.’ "AAN/UIT MET SPATIE; BEGIN=B" 

188 X=32;1=25;PLOT14,X, TY 
118 DO LINK LL26 

124 IF P#&8DO#20;G.a 

138 PLOTI4,X,Y;ë=X-159+C42-Y)X34 

148 APZ=ZAPE: | 

1SBalFPHBD=H4ISIF Y+1<42;PLOTI4,X, Tj Y= 
Y+1;PLOT1I4;,X, Y 

168 IFP#SD=#5A IF Y-1>8;PLOTI4,X, Yi Y=Y 
-1;5PLOT14,X, Y 

176 IFP#8D=#2E IF X+14485PLOTI4,X; Y;X= 
X+153PLOTI4;X, Y 

188 IFPR8SD=#2C IF X-1D15;5PLOTI4,X, YiX= 
X-15PLOT14, XY 

198 UNTIL P#8D=H#42 

200 3H8G=A;LHB2=BICLEARG 

219 DO ?#8A=#HBO4BILINK LLSGU.G . 

380b [ 

31@:LL@ LDA#88;STA#B4 ;LDAHBI ;STAHBS 

328 LDA#82;CLCGHADCE3S ;STARBE 

338 LDA#83;ADC@B; STARS ;RTS 

340:LLS LOXEG;LDYEAsLDAE3; STAHBC 

35@:LL1 LDACH84), Y5BEG LL25 INX 

360:LL2 INYsLDA(#84), Y5BEQ LL3; INX 

378:LL3 INY;LDACH84), Y5BEGQ LL45INX 

388:LL4 CLC;TYA5ADCR32;GTAT 

398 DECHSC;BNE LLI5SEC;GTYA 

408 SBC@567;5TAY;LDACH84), Y;5BEG LLG 

418 CPXE5;3BPL LL?;CPX@35BMI LL5BPL LL 


428:LL6 CPX@3;BEG LLS 

430:LL? LDAES;LDYEGISTACHBE), Y;RTS 
44B:LLB LDAEISLDYEBISTACHBE), Y;RTS 
SGB:LLS JSR LLOSILDAEZES;STARBS 


„lb:LLI LDABSZISARBH 

520:LLI1 JSR LLS;LDA#84 CLC; ADCEI 
538 STAHB4GLDAHES;ADCRG; STAKES 
548 LDA#86;CLCGADCE! ;STAH86 ;LOARBD 
558 ADCBA;STARBZ;DECHEB;BNE LUI 
588 LDA#84;CLCGADCR2;STAHB4;LDAHBS 
578 ADCRBISTAH8S ;LDAH8G ;CLC ;ADCEZ 
580 STA#86;LDA#E7;ADCEA;STAH87 
590 DECHEIIBNE LLIG;BEG LUIS 
604:LL12 LDYBOSLDXERIO;LDACHSE), Y 
618 BEG LLI3;TXASORABH2O ; TAX 
620:LL13 INY;LDA(#86),Y;BEQ LL14 
630 TXA;5ORAEHIG; TAX 

64B:LL14 TYA;CLC;GADC@33; TAY;LDACHB6), Y 
650 BEQ LL15;TXAGORABB ; TAX 
660:LL1S INY;LDACH86),Y;BEG LLI6 
678 TXAGORA@4 TAX 

6Be:LLIE TYAGADC@33ITAY;LDACHEG), Y 
639 BEQ LLI?;TXAGORA@2 TAX 
700:LLI2 INYsLDA(#86),Y;BEQ LL18 
718 TXAGORABI ; TAX 

7220:LL18 TXAGRTS 

Z3B:LLIS JSR LLO;LDAEII;STA#8G 
235 LDX@B;STXH8C 

748:LL28 LDA@IG;STAH8E 

P5B:LL21 JSR LLI2;LDXHECISTA C‚X 
255 INX;STX#8C 

760 LDA#86;CLC;ADCB2;STA#86 

7278 LDA#87;ADC@B;STA#87 ;DECH8S 
780 BNE LL21 ;LDA#86;CLC;ADC@70 
790 STA#86;LDA#B7;ADCRO ;STAHB7 
819 DECH8S;BNE LL29 

8209 LDA#80;LDX#82;STXH80 

839 STAHS2;LDA#SI ;LDXH83;STAHB3 
848 STX#81 ;LDXBOB;LDAEII ;STA#8S 
850:LL23 LDA#BOO2;BMI LL23 
854:LL24 LDreg 

8270@:LL25 LDA C,X;STACHBAI, Y 

888 INX;INY;CPY@IG;BNE LL2S 

898 LDA#BA;CLC;ADCB32 ;STAHBA 

831 LDA#8B;ADC@B;STA#8B 

895 DEC#8S;BNE LL24;RTS 

908:LL26 JSRHFEII;STAHSDIRTS 
SIOI;R. 


x” SOURCEMAKER %, 


HET GEBRUIK VAN DE SOURCEMAKER 


INLEIDING . 
In het algemeen wordt een programma in machine-code via een hulppro- 
gramma (in Basic) aangemaakt. Dit hulpprogramma wordt ook wel Suurce- 
programma genoemd, De assembler zorgt er dan voor, dat de mnemonics 
(zoals b.vs STA of LDA) in machine-code wordt omgezet. Deze code kan 
met behulp van een disassembler-programma op eenvoudige manier worden 
teruggelezen. Willen we de code veranderen, dan zullen de veranderingen 
via de Source moeten worden aangebracht. Wanneer we echter niet de 
beschikking hebben over het Source-programma, dan wordt het proble 
matisch. 
We kunnen dan het Source-progremua maken aan de hand van een disas- 
sembler listing. Er is echter een veel eenvoudiger manier: 

Het programma -— — — -— SOURCELAKEK 


WERKING 
Laden programma . 
Het prgramma dient te worden geladen via zLUAD"SOURCEMAKER" 
Het progremma is zodanig ontworpen dat het zowel in het hoge geheugen- 
gebied als ook in het lage geheugengebied kan worden gerund. Het mag 
dus in b.v. #8200, maar ook in #2900 worden geladen. 
Starten programma 
Nadat het programma is geladen, moet de textpointer worden verplaatst 
naar een waarde 2 hoger dan waar het programma werd ingeladen, Dus is 
het programma geladen in #8200, den moet de textpointer naar #64. 
Het prcgramma werkt conversationeel. Dat wil zeggen dat aan de hand 
van een aantal vragen het programma bepaald welke uitvoering gewenst 
is. Ne het hUN-commwando is de eerste vrang die wordt gesteld: 

STARTADRES ? ‘ 
Hier dient het beginadres van de machine-code te worden ingevuld. Dit 
adres mag met of zonder #-teken worden ingevoerd. Bij ongeoorloofde 
karakters volgt de melding “INPUT FOUT". Het startadres kan dan op- 
nieuw worden ingetikt. Bijvoorbeeld: 

STAhTADKES 7? AQO2 
Dan volgt de vraag: 

EINDADRES ? 
Het adres moet op dezelfde wijze worden ingevoerd als bij de eerste 
vraag, alleen mag hierbij direct een return worden ingetikt. Wordt op 
deze vraag een return gegeven, dan zal het programma verder alleen 
nog als disassembler funktioneren. 
Is het eindadres opgegeven dan is de volgende vraag: 

ADRES VOOh OPSLAG SOURCE ? 
Hier voeren we het adres in waar we de source.willen hebben, vok hier 
kunnen we volstaan met een return, waarna het programma alleen als dis- 
assembler werkt. 
Opmerking: Wanneer het opgegeven adres binnen het programma valt, dan 

volgt de melding: GELN RUIMTE VOOK OPSLAG SUURCE |! 
Ket programma stopt hierna. 

Hebben we bij bovenstaande vraag wel een adres opgegeven, dan volgt: 

GEEF SOURCENAAM ? 
Deze vraag spreekt voor zich, 
Dan krijgen we nog @ vragen, die ook worden gesteld wanneer we het 
programma alleen als disasmembler gebruiken. 

PAGE MODE J/N ? 

PRINTER J/N ? 
Ook deze vragen behoeven geen verdere toelichting. 


14 


Gebruiken we het programma als disassemblìer dan volgt ae melding: 

pass | 

Hierna volgt dan de gedisassembleergde code over het scherm. De opties 

(PAGE MODE en +RINTER) zijn nu actief. 

Wanneer er geen eindadres was opgegeven, dan loopt het progremma door 

tot ca. 31 februari. In het andere geval stopt het programma bij het 

bereiken van het eindadres. 

Opmerking: Het disassembleren kan d.m.v. de shift-toets worden afge- 
breken. Het programma komt dan weer met de vraag 
"STAKTADLES", 

Zijn we daarintegen bezig met de aanmaak van een source-programma dan 

vervolgt het programma na "PRINTER J/N" met: 

EIGEN LABELS INVULLEN: 
LABEL 1 „DKES 7? 

We kunnen nu adressen invullen, die later in de source van een label 

moeten worden voorzien. Deze loop kan worden gestopt ‘d.m.v. een return. 

Hierna vervolgt het programna wet "pass 1" en is de gedisassembleerde 

code op het scherm te zien, . 

Opmerking: Wanneer het aantal labels groter is dan 250, volgt de mel- 
ding: TEVEEL LABELS ! ' 
Het programma stopt dan, 

Bij het bereiken van het eindadres volgt de melàing: 

pass 2 
WACHT... 

Het programma is nu bezig met de aanmaak van de source. Dit kan, af- 

hankelijk van de grootte van de code, enkele seconden tot tientallen 

minuten duren, 

Opmerking: Tijdens de aanmaek van de source kan het programma worden 

afgebroken met de melding: GEEN RUIMTE VCOn OPSLAG SCUKCH | 
Het eventueel aangemaakte stuk programma is NIET te ge- 
bruiken. 

Is het aanmaken van de svurce zonder problemen verlopen, dan stelt het 

programma tot slot de vraag: . 

TABEL MAKEN J/N ? 

Indien we bij deze vraag een return of N intikken dan stopt de SOURCE- 

MAKER. 

In het andere geval kunnen we nu in het Source-programma een tabel op- 

nemen. Dif kan bijvoorbeeld Data zijn die voor of achter de machine- 

code ligt. Het begin- en eindadres van dit stuk Data geven we dan op 
bij de vragen "STAKTADRES" en "EINDADNES". De Sourcemaker stopt dan 
met de melding: 

klaar 

We kunnen nu de tertpointer verplaatsen naar het geheugengebied waar 

de Source is aangemaakt, ' 

VEEL SUCCES .……. « « DeVeZe 
A.Harchal _ E.konda 


WERELDE IJD 


10 REM WERELDTIJD 

20 REM AUTEUR: CHRISTIAN BCHN 

MW REM UIT CHIT JUNI 1981 

40 REM BEWERKT Voo ATOM Dock W ERNST, ECHT 
50 PRINT $12;2=0;@=3;F=10000; LINT!" "*! 


60 PRINT" Hitte! 
70 PRINT" +++ WEKELDTIJD +++"! 
80 PRINT" tn tt an 


85 FOR Natl TO 30;-WAIT; NEXT N 

90 IF Z=1 THEN GOTO 240 & 

100 DIM P(20),Q(1);Z=1 

140 INPUL'!""PLAATS (IN NEDERLAND) "$P 

175 INPUL"ZOMER- OP WINLERTIJD Z/r)"$Q 
120 PRINT"GEEF DE JUISTE TIJD AAN _ ";INPUI"H,M,S"T 
125 IF $Q="Z"; T=T-10000 : 
130 REM SAN FRANSISCO 

140 A=T-90000;IF ACO THEN A=Â+240000 

150 REM NEW YukK 

160 B=T-60000; IF B<O THEN B=B+240000 

170 KEM MOSKOU 

380 C=T+20000;IF C>240000 THEN C=C-240000 
190 REM BOMBAY . 
200 D=T+20000; IP D>240000 THEN D=D-240000 
210 REN MELBCURNE 
220 E-T+90000;IF E»240000 THEN E=E-240000 
230 IF $q="Z"; T=T#10000 
235 PRINT $12;G2T0 60 4 
2404 PRINT''1'$FP;GOSUB 370 5 
250 PRINT T/F, (T@F)/100,T%100' 
260 PRINT"SAN FKANSISC&G";GOSUB 370 
270 PRINT A/F,(A%F)/100,A%100' 
280 PRINT"NEwú YORK";GOSUB 370 
290 PRINT B/F,(B&F)/100,B%100' 
300 PRINT"MOSKUU";GUSUB 370 
310 PKINT C/F,(C%F)/100,C%100' 
320 PLINT"BOMBAY";GUSUB 370 
330 PINT D/F, (DEF) /100,D4100' 

340 PRINT"MELBOURNE";GOSUR 370 

350 PRINT E/F, (E@F)/100,E%100' ' 
360 PRINT"DRUK TOETS" ;LINKZFFE3; KUN 
3106D0 PRINT" ";UNTIL COUNT=20 ; KETUKN 


Mensen die in het bezit zijn van een MONIPOR of een tot monitor 
omgebouwde T‚V. en vinden dat de LICHT UrBRENGST onvoldoende is, 
kunnen het volgende doen. 
Op de hoofdprint (computer) LINKS doorkrassen, ren 39 

van de 6847 via een weerstand van + 4700 vhw met de 

+ 5 Volt verbinden. 7 
Degene die een printer hebben en deze LINK reeds doorgekrast, 
hebben pen 39 reeds aan massa gelegd. Door deze verbinding te 
vervangen door een weerstand van 4700 Chm naar de + 5 Volt wordt 
de lichtopbrengst met ca. 50 # verhoogd. 


7G 


COMELEX-KEKENEN 
‘n wiskunde hulpje 


4 REM COMTLEX REKENEN 

5 REM VOOR ACORN ATOM BEWERKT DOOR C EN Wi CAKZERS KOEKMOND 
6 TEM DATUM 1-8-1982 … 

10 P.ST2PCOMELEX KEKENEN!! Wemnumoezcensnaa?! 17 

20 FIN."EERSTE COUPLEXE GETAL — KEEEL GEDEELTE "%A;P.'07 
25 FIN.“IMAGINAIh GEDEELTE "AB; P.'47 

30 PIN,"TWEEDE COMILEXE GETAL - HEEEL GEDEALTE "AC;P.'07 
40 FIN."IMAGINAIK GEDEELTE "%D 

45 KL=((AARIC)-(HBKAL)); ALC (ABERC) + (on FAD) ) 

50 A= (HAEÁC) + (HBEAD) ) /( (HCE) + (BLEAD)) 

51 V=((RBIAC) — (ARL) )/ ((HCHAC) + (AoDEÁD) ) 


52 PeHI2STGTUT"UITKOASTEN"! eemeseesseN! N41 zn 

TA Fr."  PGA;FIF %B>=0 THEN Petr" 

15 r.&B'J"'"Ze zn nac FIF 5d =O THEN Pera! 

85 PP.ADYJ"ZI+L2 ="IN vENALCIFIF ÉB+ADD=0 THEN Pe"+" 
122 Fr.4B+AD" IJ" ZIEZ2 ="'N nEL;FIF BYD=-O THEN Pet" 
132 PP.BYe Je Z1/Z2 ="!N UW, PIF GV>=0 THEN Pe!'+" 


142 PP‚GV" JI eeereenenneenennendeeneneneennenN|| 
155 IN.'"NOG EEN BEKEKENING J/N PR; IF R=N G. 190 
170 IF k=J Peu125A=0;KB=0;C=05BD=0; G. 10 

115 G.155 

190 END 


TEA -CUPS 
tn spelletje 


OP.steshift=LEFT rept=WIGHI"EEWWAIT";F.N=0T 0200; WATT GN. 
1CLEARO;5=0;C=0; ?#E120 

2,530" CUrS SCORE"! 

4K=33260 ; 2K=255 

BP.C=OT 50 

10ï=A.k.632+32832 
20F.T=0T013;L=TxJe+E 
Q1IF?/BOO2K64=O;K=K+1; 2K=255 (KI) = 192; IF K=33279;Kek-1 
221P2/BOD1&128=0;K=K-1;2K=255GK?1= 192; IF K=33246;K=k+1 
23233248=192;?33279=192 
25WAIT;WAIT ; WAIT ° 

302L=123;2(L-32)=192 
35IP 1233247; ?L=192 
4ON. 
45IF Kel; .Q1;S=S+1; ?32790=5/10+48; 232791=5%10+48 
46232T18=C/10+48; 732779=C#10+48 
48N.;E. 


Mensen die het gewis van een AUTV-KEPEAT functie van de toetsen 
als een lacune ervaren, kunnen dit verhelpen door een draadbrug 
over de REIT-toets te solderen. Het is echter wel even wennen!!! 


EIPS van John van schaijik. 


----0p een van de Club-avonden hoorde ik dat er geen foutloos werkende 
afrondings-routine was; sommige getallen o.a. 2,345 zouden problemen 
geven. Hierbij een listing van een programma'tje waar van ik nog geen 
fout gevonden heb. Listing 1. 

=---Voor degene die met een Disk-drive werken is misschien het volgende 
van belang. Het commando xVDU maakt het scherm schoon (misschien nog 
meer?). 

Met het commando sS?öuL is het mogelijk een FILE die ge-DELETEL is weer 
terug te krijgen. U typt na abusievelijk wissen ESVOOL"FILENAME" 
(quotes mogen weg) en hup een ramp is weer voorkomen. 

Het aandruk-viltje in de Drive blijkt nog al eens problemen te geven 
(Dank aan J.Vogten voor de tip). Het laat gemakkelijk los. U kunt met 
een zaklamp van buitenaf zien of het nog aanwezig is. 

Het programma ATJM-STORE geeft bij gebruik van een D-Drive problemen 

om de DATA weer terug van schijf te krijgen. Hierbij een laad-routine 
die alle problemen oplost. Listing 2. 


koermond 13.08.1983 Net vriendelijke groet, 


dohn van Schaájik. 


LISTING 1 LISTING 2 
1 KE SUBROUTINE "SCHIJVEN 20 P.$12 
ACHTER DE KOMMA" 25 P.'adressen-bestand"!* 
2 FIN.%A;GUSUB a 30 P. "INSERT FLOPYY NO, 1" 
20 END 32 P."ALS KLA DKUK Of SPATIE- 
10000a @ =0 TOETS" 
10Q05 A=0;B=0;C=0;LD=0 5 LINK#FFE3 
10010 {B=%Az 1000 ; A=KB de P.821 
10020 B=A/1000 6O[;JSR #E00O;J 
10030 C=1000zB 65 P.$6 
10040 D=A-C;D=D+5; D=D/ 10 66 zLO.srDaT 2600 
10050 P.B,",‚",‚D;R. 70 zLO."STOKE" 8200. 
72 Pet "EVEN GEDULD" 





15 F.Q=1T0100;WaAIT;N. 
80 718-482 
100 kUN 
DE GEHEUGENKAART en zijn WEERSTANDEN 
Ri, Rè2 2Kk2 k23 220 rn 
27K R30 47 ‚ 
Rie ida RT BK R31 56 Ohm !tt persé geen 56K 
R28 27K kan ook weg R32 33K 
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TaBLLaTOh 
Deze routines verzorgen een horizontale en vertikale tabulator, 
Zowel op het beeldscherm, als op de printer!! 
Ze MOETEN opgenomen worden in een 'toolkit' of 'schakelsoft'. 
Formaat: HTAB x of VTAB x, waarbij x een getal is, dat aangeeft 
waar het printen begint, Als argument (x) is ook zondermeer een 
variabele of zelfs een wiskundige uitdrukking mogelijk. 


O REM HTAB; VTAB 
10 DIM LL(2); INPUI"ASSLEBLE TU" 

20 FOR N=0 TO 2; LL(N)=A; NEXT N 

30 FOh N=] TO 2; P=A;Ll 

40 \ HTAB 

50 JSHAC4EI;DEX;STX 4;LDY #16,X;BEQ LL1;DEY 
60:LLO JSR#F379;DEY;BNE LLO 

TO:LL1 JMP4C55B 

80 \ VTAB 

90 ISRAC4EI; DEX; STX 4;LDY #16,X;BEQ LL1;DEY 
100:LL2 JSR/FFED;DEY;BNE LL2;BEQ LL1; JMP/C55C; } 
110 NEXT N;@ =O; PKINT"CODE VAN #"&A" TUT #"&P-1'; G-B; END 


PAUZE 
Deze routine maakt een wachttijd mogelijk van max. 4,25 sec. 
Formaat: PAUZE x; waarbij x niet groter mag zijn dan 255 en niet 
kleiner dan O. Ze MOET ook weer gebruikt worden in een ‘toolkit! 
of *schakelsoft!, 


O KEM PAUZE 

10 DIM LL(2);INPUR"ASSLMBLE To" 
20 FOk N=0 TC 2; LL(N)=A; NEXT N 
30 Fok N=1 TV 2; v=ast 


40 JSRÉC4E1; DEC4; LDX4; LDA#25,Y; TAYs INYs LDA#16,X; TAX; BEQLLI 


5O:LLO JSK#FB83 
6O:LL1 DECO; BEQLLO; Jhir#C55B;J 
70 NEXT N;@ =O; IKINT"CODE VAN #"&A" TOT #"&P-1!; @ 265 ENL 


ROUIINE 1 


Deze routine maakt het scherm schoon vanaf de cursor. De regel waar 


de cursor staat wordt ook schoongemaakt. 


10 DIKLL(2) ;P.N=0 TC 2SLL(N)=ZEFFF iN. 

20 IN."CBJ.-CCLE"A;F.N=ITC2; i=AsC 

30 LDA; JSRAPFF4 ; LDAALE; STA#9 1; LDAADF; STA#I2; IME LL1 
4O:LLO LDYEO;LDA #20;STA(HII) ,Y 

50:LL1 CLC;LDA#I1; ADCEI; STAAII; LDAAI2G ADCRO;GSTAAI2; CMP #82 
60 BEQ LL2; JM LLO 

TO:LL2 RTS 

BO ;N 

9O KEM DEMONSTRATIE 

100 F.830;F.N=1T05;5P.8IO;N.SLINK A3END 





1 REM MEMORY VOOR 2 PERSONEN 
2 REM DOOR: J.VERSTELLE 
% REM SLEUTELBLOEMZOOM 1 
4 REM 2353 RA LEIDERDORP 
10 DIM AA(48),M(10) ‚N(10) ;@=P; 1232; K=b; Red 
20 P.$12," memory”; ?ÁE1 =Ó; GOS .x 
40 FOR Bei TO 48;AAB=Ó;NEXT B 
70 FOR C=1 TO 2 
80 FOR D=129 TO 152 
GO. E=(ABSRND%48+200};GOTO E 
200BIF AAl=Ú;AA1=D; GOTOa 
201 IF AA2=Ó; AA2= D;GOTOa 
202 IF AAS-f;AA3=D;GOTOa 
203 IF AA4=@;AA4=D;GOTOa 
204 IF AA5=#}AA5=D; GOTOa 
205 IF AAG=P;AA6G=D; GOTOa 
206 IF AAT=Ö;AAT=D;GOTOa 
207 IF AAB=f; AAB=D; GOTOa 
208 IF AAG=f;AAG=D; GOTOa 
209 IF AAT Oz; AA1 OED; GOTOa 
210: IF AAf1=Á;AA11=D;GOTOa 
241 IF AA12=D;AA1 2=D;GOTOa 
212 IF AAl3=g;AA13=D;GOTOa 
213 IF AAl4=f;AA14=D;GOTOa 
214 IF AA15=G;AA15=D;GOTOa 
215 IF AA16=f;AA16=D;GOTOa 
216 IF AA1T=Ú;AA17=D;GOTOa 
217 IF AA18=f;AA1B=D;GOTOa 
218 IF AA1G=Ú;AA19=D;GOTOa 
219 IFP AA20=f;AA20=D;GOTOa. 
220 IF AA21=E;AA21=D;GOTOa 
221 IF AA22=G;AA22=D;GOTOa 
222 IF AA23= =D; AA23=D; GOTOa 
223 IF AA24=Á;AA24=D;GOTOa 
224 IF AA25=Ú;AA25=D;GOTOa 
225 IF AA26=f;AA26=D; GOTOa 
226 IF AA27T=f; AA2T=D; GOTOa 
227 IF AA28=Ú;AA28=D;GOTOa 
228 IF AA29=f;AA29=D;GOTOa 
223 IF AA30=d;AA30=D;GOTOa 
230 IF AA31=Ú;AA31=D;GOTOa 
231 IF AA32=f;AA32=D;GOTOa 
252 IF AAS3S=f;AA53=D;GOTOa 
233 IF AA34=f;AA34=D;GOTOa 
234 IF AA35=f;AA35=D;GOTOa 
235 IF AA56=d;AA36=D;GOTOa 
236 IF AA37=D;AA3T=D;GOTOa 
23T IF AA38=Ó;AA38=D;GOTOa 
238 IF AA39=D;AA3G=D; GOTOa 
239 IF AA4Oef; AA40=D; GOTOa 
240 IF AA4Al=d;AA41=D;GOTOa 
241 IF ALDE Ús; AA42=D; GOTOa 
242 IF AA43=Ó;AA43=D; GOTOa 
245 IF AA44=D;AA44=D; GOTOa 
244 IF AA45=f}AA45=D;GOTOa 
245 IF AA46-E;AA46=D; GOTOa 
246 IF AA4T=D;AA4T=D;GOTOa 
247 IF AA48=P; AA48=D; GOTOa 
250 GOTOb 
253aNEXT D 
NEXT C 


257 
30 


285 
290 
530 
540d 
545 
350 
560c 
370e 
380 
585 
590 
450 
460 
â 10 


ER EA HAAM" SM 

GOS.z; IN. "2, UW NAAM"SN;P.8M; GOS .w 
P=1;Q=Ó;GO0S.y;GOS.z 

IN, "EERSTE KAART'"X; GOS .25 IN. "TWEEDE KAART '"Y 

IF AAX<1 OR AAY<1;GOTOe 

IF X<>Y; IF X>f; IF X<49; IF YP; IF Y<49; JeÂBOA1 3 GOTOe 
P„$50,"SVP HERHALEN W;GOB.x5 GOS ez; GOTOd 

FOR H=i TO 48 

IF X=H OR Y=H;?J=Is?(J+1)=AAEH 

IF H=8 OR H=t6 OR H=24 OR H=32 OR H=40;J=J+32 
Jad+4;NEXT H 

IF AAX=AAX;GOTOh 

GOS.x;GOS.F; GOS. 2; IF P=l;P=b;Q=1sP.' „EN GOS .WIG.Ê 
P=1;Q=Ó;P.',$8M; GOS .w 


480fGOS.z; GOTOd 
AQOhAAX=; AAY=Á; IF Pal;KeK+1;GOTOj 


500 
510 
520 
530 


R=R+1 
GOS.x;G08.y;GOS.2; IF K+R=24;P. "HET SPEL IS UIT";END 


IF vaten 


P.',SN 


54O0KGOS .w4 GOS „zZz; GOTOA 
860yP.$30,'' ‚SM, ",oe"",K‚„" PUNTEN"! „SN, ", …….'t,R‚" PUNTEN"! tn u 


865, FOR S=1 TO 47 

866 IF AAS<1;P." ";GOTOv 

863 IF S<10;P," ",‚S," #;GOTOv 

872 P.S," " 

875vIP S=8 OR S=16 OR S=24 OR 9=32 OR S=40;P,"" Ht 

878 NEXT S;IF AA4B<1;P." ";RETURN 

879 P.‚"48";RETURN 

BBOwP." IS AAN DE BEURT ";RETURN 

B9OxFOR A=1 TO 200;WAIT;NEXT; RETURN 

g00zP.,$30," ‚",830; RETURN 

999 END 
t=tetstaetatetstetetetetetetetetetetetetstetetetetetatatstatstetatetatetetr 


500 
610 
620 
630 
640 
650 
660 
665 
666 
670 
680 
690 
700 
705 


600 
601 
602 


REM WEDLOOP 
DIM XX15,YY15; N= 

FOR A=1T015;XXA=4;N.A; D=15 

FOR C=4T046 93; YYD=C;D=De1 ;N.C 

CLEAR É;P.830=f;B=1; FOR A-BTO43 5.3;P.B';BeB41;N.A 
Pp." WEDLOOP";MOVE 63,3;DRAW 63,47 

N=N+1 ; B-ABSRND%1 541 ; F=ABSRND%59+4 

REM E IS VOOR DE NUMMERS (BIJV, VAN PAARDEN). 

REM F IS VOOR "DRAW" 

IF XXE>=F;GOTO 660 

XXE =XXE4+1;MOVE 4,YYE;DRAW XXE,YYE 

IF XXE<>62;G0TO 660 

P.$787830;FOR A=1TO E;P.!;N.A 

P.$11$989" "‚N," PUNTEN";GOTO 660 


REM DOOR: J.VERSTELLE 
REM SLEUTELBLOEMZOOM 1 
REM 2353 RA LEIDERDORP 


HES LAATSTE DEEL VAN DE ASSEMBLER CURSUS 


Deze keer is het dan zover! De laatste afleverins van de 
Assembter cursus. 

Wat is er te verwachten in deze afleverings: 

a Het slot van de interupts 

b Een doe het zelf bijlase over het puntjes tekenen in 
Assembier. 


Allereerst de interupts deet 2 


De seprosrammeerde interupt 


Een seprosrammeerde interuet onderbreekt in tesenstel lins tot de 
1/0 intervet nooit een prosranma. Een seprosrammeerde interupt 
WOrdt dan Ook pas afgehandeld als de prosrammeur daartoe in het 
prosramma een implicite opdracht geeft. 

Een voorbeeld wat het verschil tussen een I/D interupt en een 
seprosrammeerde intervat. Het voorbeeld van de 1/0 interupt is 
bekend van de vorise afleverins: U leest uw Krant. De postbode 
belt aan. Het lopende proces wordt onderbroken. 

Een voorbeeld van seprosrammeerde interupt is anders: U leest uw 
krant. Nadat u uw krant uit heeft, saat u Kijken of de postbode 
al geweest is. 

Dit is nu het specifieke verschil tussen een geprosrammeerde 
interupt en een 1/0 interuvoet. 

Een apparaat wat sek is op geprosrammeerde interupt is, is de 
printer. Een printer die parratel Wordt aansestuurd werkt, zoals 
u weet, volgens het "handshake“ principe. Dit handshake is in 
wezen niets anders dan een speciale vorm van seprosrammeerde 
interuotìi De processor maakt de printer duidelijk dat deze 
seldise data (sesevens in de ASCII code) heeft. (strobe puls). 
De printer maakt op zijn beurt de processor duidelijk dat deze 
het begrepen heeft (acknowledse) , en dat de printer eventueel 
bezis is: met printen bij voorbeeld. Cbusy). De prozessor moet 
dus Wachten met nieuwe data aanbieden tot de printer zich heeft 
terus semeld. Dit teruvemel den wordt sedetecteerd met de 
serrorammeerde interuet. De 6522 VIA speeit hierbij een 
voorname rol Deze heeft een zosenaamd interuet resister. Als er 
een interupt van de printer binnen komt: wordt een bitje in dit 
resister gezet. 


a? 


Door in het hoofderosramma af te scannen of dit bitje inderdaad 
een 1 is, is het dus moselijk om te kijken of dit het geval ig. 


Het maakt dus niet uit Cin principe ) wanneer dit sebeurd,: al is 
het een uur later. Het enise waar de pPprosrammeur voor moet 
zorsen is dat het bitje weer laas is voordat de volsende 


interrupt om de hoek Komt Kijken. Dit verkaart tevens waarom de 
Atom er schijbaar mee stopt als er wel een VIA is aansesioten en 
geen erinter en er wordt een {control b) seseven met een 
Willekeuria teken. De atom blijft wachten op de terusmeldins van 
de printer die niet aansesioten is. En zoals u weet seven niet 
aansestoten apparaten in het algemeen weinis terusmeldinsen. 
Zoals uit het seheel wel duidelijk zat zijn seworden: wordt de 
IRG noch de NMI insansen sebruikt. Dit onderbreekt immers een 
lopend prosramma,. Een seprosrammeerde interupt werkt dus al leen 
met een interupt vlassen resister. 


De derde vorm van interupt is de DMA interupt. 


Normaatsesproken schrijft alien de processor in de memory map. 
Toch kan het sebeuren dat dit niet snel senoes gaat. Er is dan 
een moselijkheid Om de processor te isoleren van de data en 
adresbus. De bussen zijn nu vrij voor een ander apparaat om te 
gaan schrijven. Een ftoppy disk kan dit bijvoorbeeld doen. Onze 
6582 heeft standaard seen faciliteiten voor DMA arapjes. Wil met 
toch aaan DMA-en, dan moet d.m.v. @xtra tri state butters de 
hele handel worden Seisoleerd. De ZE8 micro processor heeft een 
speciale bus request insans, die: als deze laas wordt, de hele 
bus vrij seeft. 

Tot zover de DMA. DMA staat voor direct memory acces. (directe 
toegans tot het seheusen). 


En dan de bijlase voor deze keer. 


Deze routine tekent een puntise op X,Y waarbij X correspondeerd 
met ?#78 en Y met ?#71. Het werkt alleen in cieará, Probeer zelf 
ny eens een analyse op te zetten en de werkins van dit 
programmatje te doorgronden. Wie weet is het bruikbaar voor u in 


snelle teken prosramtma' s. Het is vele malen snelter dan 
PLOT13: X: Y. 


Wel dat was het wat de Assembler cursus betreft. Bij deze 
iedereen bedankt voor de positieve reacties en speciale dank 
voor het vit typen van de eerste afleverinsen aan de heer 
Borshaerts. 

Verder wil iK hierbij een oproep doen aan een ieder die iets 
over de Atom floppy drive heeft seschreven. Ik toor namelijk met 
plannen rond om rond de atom disk drive een soort vervois cursus 
te gaan schrijven: vooral nu de acorn drives erg voordetis zijn 
geworden. Wie dus wat heeft: het zij prosramma's,: hetzij 
dacumentatie: Ktim in de pen. 


LEENDERT BIJNAGTE. 


1BREM PUNT TEKENEN IN CLEAR4 
ZOREM BIJLAGE ASSEMBLER CURSUS 
SODIM LL12 

4OFOR N=@ TO 18 

53 LLNe-1 

EGNEXT 

7OFOR N=3TO 1 

80 P=#2300:£ 





SBLDA #70 
188STA #5A 
118LDA #71 
129STA #5C 
150LDA #5A 
14BLSR A 
15GLSR A 
iEGLBR A 
170STA #S5F 
188tDA at 91 SOBREM PLOT VOORBEELD 
1905EC S1OP=#2850: £ 
20BSBE #5C 520L DAAG 
210CMP &192 530STA#70 
220BCS LL S54GSTAR7 1 
230LDY 9#29 SSO:LLi JSR#2800 
24DSTY #63 SECINC#7 
25BASL A S7OINCH7 1 
260ROL #EG SBOBNE LL1 
270ASL A SSORTS 
260ROL #63 500+ J 
230ASL A E1OCLEAR4 
SOAROL #60 EZOLINK#2ESD 
31@ASL A ESAFOR N=0T0 100 
320ROL #ED ELD WAIT 
33BASL A ESONEXT 
S4OROL #63 EEOPRINT E12 
35BADC #5F 57@P=#20601 € 
JEBSTA #5F 688: LL ELDAAZS s STAE7 B 
37ÖLDA #60 E9B:LL2 JSRW2800 
388ADC 9#80 700 INCH7G 
3985TA #EG 71QBNE LLZ 
4OBLDA #5A 720RTS 
41GAND 37 730:LL4 
420TAY 74GLDAS10: STAH7 15 JSRLLI 
43BLDA #F7CH, Y 75ULDAE205 STA#7 13 JSRLL3 
44OLDY AAG 7EBLDADSA STAH7 1 5 JSRLLT 
4SBORA HSE). Y Z7OLDA4D: STAK? 15 JSRLLI 
4EBSTA (HSE), Y 7EULDAASD 5 STAN? 15 JSRLLI 
4678:LLG RTS 7IOLDADEG: START 13 JSRLL3 
4804 BOARTS 
498 NEXT 8103 
SEBCLEARG 
SBEBLINK LL4 
B4BEND 


LEENDERT BIJNAGTE 
A4 


JOSBOX # AXR 1 


Toen ik in het bezit kwam van de josbox via Jan Lernout , heb ik deze 
direkt getost met de test die in de handleiding van de AXR 1 staat . Deze test 
staat ook in HOBBIT en gaat alas volgt : 

1 X=B;FOR A={AGDD TO #AFFF 

2D XeX:PA;NEXT A 

3 PRINT X,$#AF1C 

49 END 
Na een RUN zal de Atom na een tijdje moeten terugkeren met de melding PSEW . 
Dit voor wat betreft de AXR1 , Bij mijn josbox kwam de melding 216SEW . De drie 
letters SEW vormen een string die in de eprom ingebakken is op locatie #AFIC 
en is vier bytes lang , inclusief het string einde karakter #JD . De d of 
216 bij de josbox is een poort checksum ; het verschil tussen AXR 1 en de 
Josbox bleek op't eerste Ulesar groot en situeert zich voornamelijk binnen de 
instruktie RELOC . Hieronder zet ik een disassembler listing van beide eproms 


langs elkaar , tenminste van die stukken die verschillen : 


ADRES JOSBOX AXR1 

CODE SYMBOOL ADRES CODE SYMBOOL 
ABBD: 84 90 STY#90 
ABBF: 20 FB AO JSR#AOFB 
ABC2: 20 BB AG JSR#A688 
ABC5: 20 31 C2 JSR/C231 
A8CB: 20 8B C7 JSRÁC78B idem als bij josbox 
ABCB: A5 35 LDA#35 
ABCD: 05 44 ORAÉ44 
ABCF: DO E7 BNE#ASB8 
ABD1: 20 AE A8 JSR#ABAE 
ABD4: 90 E2 BCC#A8B8 
A8D6: 20 31 C2 JSRÁC231 
A8D9: AD FD AB LDA#ABFD ’) A8D9: 20 8B C7 JSR#C78B 
ABDC: C9 43 CMPO#43 / (À) ABDC: A5 36 LDA#36 
ABDE: DO D8 BNE#A8B8Í ABDE: O5 45 ORA#45 
ABEO: 20 8B C7 JSR#C78B ABEO: DO D6 BNE#A8B8 
ABE3: A5 36 LDA/36 ABE2: 20 CB C3 JSR/C3CB 
ABE5: 05 45 ORA#45 ABE5: 20 E4 C4 JSRÉC4E4 
ABE7: DO CF BNE#A8B8 AGE8: 84 91 STY#91 
ABE9: 20 CB C3 JSR4C3CB ASEA: 88 DEY 
ABEC: 20 E4 C4 JSRÁC4E4 ASEB: A5 90 LDAÁ90 
AGEF: 84 91 STY#91 ASED: FO OS BEQ#A&FS8 
A8F1l: 88 DEY ABSEF: 20 B7 A7 JSR#A7B7 
A8F2: A5 90 LDA#90 A8F2: A8 TAY 
ABF4; FO OS BEQ#AS8FF A8F3: 88 DEY @ 
AAF6: 20 B7 A7 JSR#A7B7 A8F4: C9 03 CMP#03 
A8F9: A8 TAY A8F6: FO 2B BEQ#A923 
ABFA: 868 DEY A8F8: Bl 92 LDA(#92) ‚Y 
ASFB: C9 03 CMP@ #03 ABFA: 91 52 'STA(#S2) ‚Y 
ASFD: FO 24 BEQ#A923 ABFC: Dl 52 CMP (#52) ,Y 
A8FF: B1 92 LDA( #92) ,Y ABFE: FO 03 BEQ#A903 
A901: 91 52 STA(Á52) ‚Y A900: 4C F6 CD JMPÉCDF6 
A903: D1 52 CMP (#52) ‚Y A303: 88 DEY 
A905: FO 03 BEQ#ASOA A904: 10 F2 BPL#AS8F8 


A907: 4C F6 CD JMP4CDF6 A906; 20 A2 AB JSRÉABA2 a5 


Verder zijn er nog drie plaatse 
CS5S5B ; 
ADRES 


ue i 
aahaert 
ada 3 


265 


ASOA: 
AS9OB: 
A9OD: 
A910: 
A91le2: 
A913: 
A915: 
A917: 
A919: 
A91B: 
A9lDe 
ADIlE: 
A920: 
A923: 
A925: 
A926: 
A92B: 
A92A: 
A92B: 
A92D: 
ager: 
A930: 
A32: 
A934: 
A936: 
A937: 
A939: 
A93B: 
A93D: 
AS93F : 
A940: 
A942: 
A944: 
A946: 
A948: 
A94A: 
A94C: 
A94E: 
A950: 
A951: 
A953: 
A955: 


10 
20 
90 
18 


65 
85 
90 
E6 
C8 
FO 
4C 
AS 
88 
F1 
AS 
C8 
Fl 
90 
88 
Bl 
ES 
85 
CB 
Bl 
E5 
90 
85 
18 
A5 
65 
85 
A5 
65 
91 
Dl 
DO 


Fo 
AS 
BO 


Fe 
A2 
OE 


52 
91 
52 
0e 
53 


D2 
SB 
17 


92 
26 


92 
DO 


ge 
54 
92 
25 
ca 
18 
56 
27 
55 
52 
B7 
AC 


F3 


A8 


c5 


DET 
BPL#ASFF 
JSRÉABA2 
BCC#A920 
CLC 

LDA{52 
ADC#91 
STA#52 
BCC#A9ID 
INC#53 

INY 
BEQ#ABF2 
JMPÁC5SB 
LDA#17 

DEY 
SBC(#92) ‚Y 
LDA#26 

INY 
SBC(#92) ‚Y 
BCC#A8FF 
DEY 
LDA(#92) ‚Y 
SBCÁ16 
STA#54 

INY 

LDA( #92) ,Y 
SBC#25 
BCC#ASFF 
STA#55 

CLC 
LDA#18 
ADC#54 
STA#56 
LDA#27 
ADC#55 
STA(#52) ‚Y 
CMP (#52) ‚Y 
BNEÁA907 
DEY 
BEQ#ASFF 
LDA#56 
BCS#A94A 





A909: 90 
Â90B: 18 
A90C: A5 
A90E: 65 
ÂS10: 85 
A912: 90 
A914: E6 
A916: CB 
A917: FO 
A919: 20 
A91C: AC 
A91F: OO 
A920: OO 
Agel: BO 
Ag22: OC 
A923: A5 
A925: 88 
A926: F1 
A928: A5 
Ag2A: CB 
Ag2B: F1 
Ag2D: 90 
Agar: 88 
A930: B1 
A932;: ES 
A934: 85 
A936: C8 
A937; Bl 
A939: E5 
A93B: 90 
A93D: 85 
A93F: 18 
A940: A5 
A942: 65 
A944: 85 
A946: A5 
A948: 65 
Â94A: 91 
A94C: Dl 
A94E: DO 
A950: 88 
A9Sl: FO 
A953: AS 
AD56: BO 


OE 


52 
91 
52 


53 


D2 
FB 
SB 


17 


ge 
26 


ge 
Cg 


92 
16 
54 


ga 
25 
BB 
55 


18 
54 
56 
27 
55 
52 


BO 


A5 


F3 


AO 
C5 


BCC#A919 
CLC , 
LDA#52’ 
ADC#91 
STAÁS2- 
BCC#A916 
INC453 

INY 
BEQ#ASEB 
JSR#AOFB D 
JMP#C55B 
BRK 

BRK 

22? @) 
22? 

LDA#17 
DEY 
SBC(#92),Y 
LDA#26 

INY 

SBC( #92) ‚Y 
BCC#A8FB 
DEY 
LDA(#92),Y 
SBC#16 
STA#54 

INY 
LDA(#92) ,Y 
SBC#25 
BCC#A8F8 
STA#55 

CLC 

LDA#18 
ADC#54 
STA#56 
LDA#27 
ADC#55 
STA(#52),Y 
CHP(#52) ‚Y 
BNE#A900 
DEY 
BEQZA8F8 
LDA#56 
BCSKAG4A 


n waar de AXRl springt naar A919 en de JOSBOX naar 


wat leren we nu uit deze listing ? Wel , het verschil in de routine voor de 
RELOC functie (staat van ABBD tot en met A956 voor zover ik weet }) tussen 
JOSBOX en AXR1 is miniem , De instructies aangeduidt met DD sfaan wel in 
de JOSBOX maar niet in de AXR1 . Het nufan deze instructies is mij in't 
geheel niet duidelijk , Immers als we gaan kijken op geheugenplaats #ABFD 
dan staat daar #43 , en dat staat daar voor altijd wv het bevindt zich in 
eprom „ De twee volgende regels hebben dus absoluut geen zin ; er zal toch 
nooit naar #A8B8 gesprongen worden |! Ter kompensatie van deze 7 extra bytes 
in de JOSBOX staan in de AXR1 ten eerst de 4 bytes gemerkt ©) ‚Aangezien 

er vóór deze blok steeds weggesprongen wordt naar {C55B, worden deze 
“instructies' nooit bereikt „Volgens mij dus volstrekt nutteloog ‚ maar ja 
ik zou mij natuurlijk kunnen vergissen . Blijft nog over de extra instruktie 
genummerd @ in de AXRÌ . Hier wordt eerst een subroutine op #AOFB door 
lopen . Deze routine zet het X-register alsook geheugenplaats 4 dat voor 

de tijdelijke opslag van het X-register dient ‚ op # . Dit zou van belang 
kunnen zijn voor de afhandeling van volgende instructies Zeker ben ik daar 
niet van , dat zou nog eens nader onderzocht moeten worden . Feit ís dat mijn 
ÂTOM goms kuren vertoond ala de JOSBOX erin zit ‘ ondermeer “blijven hangen" 
na een foutmelding etc... 

Ook de afwijkingen die onderaan op de vorige blz. staan hebben betrekking 

op het # maken van X . Immers op deze 3 plaatsen (6 bytes = 3 adressen } 
wordt in de AXRI eerst naar dA9IS gesprongen vooraleer naar ÁC55B te gaen . 
Het d maken van X zal dus wel zijn belang hebben | Het zou natuurlijk kunnen 


dat er nog andere versiea circuleren , dus probeer de test eens , 


* 
hed 
Ahead 
helked 
+ 


CUYPERS FRANK 





SOFTWARE 
Problemen 


Battery Backup 


UITGEBREIDE BESCHRIJVING INCL, WIJZIGING VAN DE BATTERY BACKUr 
OP DE SCHAKELKAART . 


Battery Backup op de schakelkaart is aangebracht ow de reden dat 
indien de voedingsspanning afgeschakeld wordt of uitvelt, de aan- 
gesloten geheugen IC's hun inhoud niet verliezen, Dit betekend in 

de praktijk dat de voeding van deze IC's overgenomen wordt door een 
batterij en tevens worden de CS lijnen hoog gehouden. Op deze ma- 
nier is men er van verzekerd dat ze kun inhoud behouden. 

Bezien we het schema. De +5 V voeding brengt via D3 op punt +B een 
potentiaal van 4,4 V. De batterij is via D1 op het zelfde punt aan- 
gesloten, maar aangezien +4,4 groter is dan +3 spert deze diode Di. 
+B fe de voeding vour de kAMS incl. hold IC's 3,4,5. Weerstand h1 
steat parallel aan den basis-emitter diode van de transistor en 
hiermede is de spanning en de stroom door de weerstand bekend. De 
spanning over B-k diode kan max. 0,7 V bedragen en deze spanning 
staat ook over k1, de stroom door h1 is dus 0,6/56 Ohm = 12,5 mA. 
Deze 12,5 mA.komen van de_+5 V voeding en doorlopen zowel LED D2 als 
ook R2. Over R2 ontstaat een spanning van 12,5 mA « 220 Ohm = 2,75 V. 
kest aldus voor de LED 5-3,45 = 1,55 volt. ij 

De collector van T1 ligt, omdat de basis opengestuurd is, op O volt. 
Deze 0 volt wordt aan de ingangen van IC's 3,4,5 doorgegeven’ en staat 
voor de toestand; voeding aanwezig. 

Daar de spanning op de collector 0 V bedraagt en de spanning op +B 
4,4 V, staat over k3 een spanning van 4,4 V, welke een stroom door 
deze weerstand veroorzaakt van 4,4/330K = 13,3 uA, waarvan circa 

3 uA benodigt is voor de ingangen van IC's 3,4,5. 

Op punt +B zijn tevens de elco's C9 t/m C18 aangesloten, functioneel 
als buffers van de voedingsspanning en ontkoppeling van dat punt. 
Indien nu de voedingsspanning van +5 V uitvalt gebeurt er het volgende: 
De transistor gaat sperren daar er geen sturing meer is via LED De en 
weerstand R2. De spanning op het lunt +B zal langzaam (afhankelijk van 
de aangesloten belasting) dalen van 4,4 V naar 2,8 V, dit komt door de 
restlading van bovengenoemde elco's 

Bij het afschakelen van de voeding spert D3 onmiddellijk dear op het 
punt. +B nog het 'oude' potentiaal heerst, Diode Dt komt in geleiding 
zoära de spanning op punt +E beneden de 2,8 V gaat, op dit moment 
neemt de batterij de zgak over. 

Op punt +B staat dan 2,8 volt. We hadden al gezien dat de ingangen 
van de IC's 3,4,5 samen circa 2,2 un nodig hadden, zodat over K3 een 
spanning valt van 2,2 x£ 330K = 0,763 volt, zodat de restspanning op 
de power down lijn 2 ‚8-0,76 = 2 volt bedraagt in standby mode. ak 
De spanning op de ingangen van de IC's 3,4,5 bedraagt dus 2 volt (bij 
een batterij spanning van 3 V), dit is een erg kritische spanning 
daar in de MOS techniek voor een zuiver gedefinieerde '1' eed spgn- 
ning is vereist van >= 2 volt. 

Indien de batterij dus iets aan potentiaal verliest, heeft dat tot _ 
gevolg dat deze benodigde logische '1' niet meer'zuiver gedefinieerd: 
is. We zitten dan in het verboden gebied, zoals dat heet. 

Daarom kunnen we weerstand R3 van 330K beter vervangen door een 33K 
exemplaar. Hierdoor blijft op de FD lijn in standby mode ruim 2,7 V 
staan en in bedrijfs toestand (met de voeding in) loopt door T1 een 
stroom van circa 130 uh. Dit is natuurlijk wel een factor 100 greter 
dan voorheen maar dit heeft geen invloed op de werking van de scha- 
keling. 

Indien de YD lijn door een of andere sluiting aan +5 V cf aan +B zou 
komen te liggen, kan in de huidige situatie een kortsluitstroom over 
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de koperbanen van PD lopen, via de trui vor PV, van 1,4 AiLpere. 
Dit kan funest gijn voor de priatsperen en vin dit te vuorkumen kan 
men beter in de bais van TA ven weerstand Opimewen. Deut zal indien 
de basisstroom zou willen toeutmen, ven zodanige spanningsval ver- 
Gortuken dut de 1C vtroom op een voor de veintbunen veilige waarde 
begrenst wordt, Dee weerstard heeft in de bedrijfntuestand geen in- 
vlved, daar de basis stru circa. 1 ui bedraagt. lidien we dus als 
baudoweerstand 560 «lun nemen, heeft dit vern sparningeval tot gevolg 
van circa 0,5 wV, verwaarlovoubaar dus. 

Bovenstaande wijzigingen zijn standard al uitgevoerd op de geheugen 
keert, omdat hier het V drempel pretibseem tege wer opet de, daar er 
hier geen 4 ingangen aangestuurd moesten werden (schakelkaarct) maar 6. 
Boverstaand verhaal is een beetje uitgelopen inlenste, maar ik hoop 
dat veker de beginnend cleetrvaievuw er bets van beeft. 
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SCHETS 2: Wijziging van het soft schakeladves 
FEIPF neer ZErlrk 
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Le nn, 


PE 


men, 





ze verbindings draden 


„ 


sn; N 
pen 4 “ dovrkrassen var printspoor 
welk naar pen 4 gaat 


De priutsporen lopen aan de onderzijde. 


SDR TWARE : Dat abest 





DBASE is een programma voor de ATOM om bestanden te verwerken. 
Het is eigenlijk een elektronische kaartenbak. We kunnen DHASE 
gebruiken om ledenlijsten bij te houden, een platen- en/of 
boekenverzameiing op te slaan, klanten met hum orders te 
registreren etc, ‚ 

Het bijbehorende programma DFRINT VÒ.1 dient om gegevens in een 
bruikbare vorm uit te printen. Met dit programma hebben we de 
mogelijkheid om bv. adreslabels of voorraadlijsten te printen. 


De programma’s staan op de band (E00 Baud) onder de namen 
“DBASE-V2. 0" (en "DERINT-VO, 1",- VOLGENDE KEEK) 

We laden en starten Dbase met het commando: 

XKUN" DHASE VZ, CG" 

dit commando laadt het programma op H#HEROO en lankt naar het 
startadres. 


hed 


Beschrijving van de commarde’s van DEASE-VE. 0, 





Als we het programma starten met XRIJN. .… of LINKH&DPRG verschijnt 
het keuze menu op het scherm (Dit is telkens na afloop van een 
commando zichtbaar (fig.1)). 

De enige twee commando's die bij het begin gebruikt kunnen worden 
zijn CREATE en LOAD. Alle andere geven de melding: "NO FILE IN 
SYSTEM. ". 


DD ECREATE, 


Na het geven van het commando "CGC" ziet het scherm er uit als im 
figuur Za. We kunnen nu beginnen met de definitie van de vorm van 
onze elektronische kaartenbak. 
Allereerst zullen we een titelveld definieren (a) door simpelweg 
de door ones gewenste titel ‘in te tikken. We willen bv een 
adressen bestand creeeren met als velden: 

NAAM: 

STRAAT: 

PLAATS: 

TELEFOON: 


We toetsen hiertoe de veldmamen in (gevolgd door een 2CHE), de 
overige & velden (we hebben een maximum van 10) laten we leeg 
door hier alleen een SER: in te toetsen, Na 10 velden verschijnt 
automatisch het menu weer op het scherm. 

NE1:Deze velddefinities hunnen niet meer ge=edit worden. Zorg er 
dus voor dat ze aan tw eisen Voldoen. 


OO 


voordat U met het invoeren van data begint. Wijsigen Kan nù PO 
door simpelweg opnieuw het commando “C" te geven en alle velden 
opnieuw te definieren. : 

NE2: Het commando CREATE wist alle in het geheugen aanwezige data; 
pas hier dus mee op. Als U per ongeluk op "CC" gedrukt heeft, kunt 
U dit weer ongedaan maken door als EERSTE en ENIGE karakter "*" 
in te toetsen gevolgd door een <CRè in het titelveld, waarna het 
menu weer verschijnt en de oude file ongewijzigd is. (Zie ook de 
figuren 2b en Sc). 


Dit commando dient om een eerder gemaakt bestand van de band (of 
diskette) terug te lezen in de ATOM, De snelheid waarmee dit 
gebeurt is gelijk aan de snelheid van de COS voordat DHASE 
gestart werd. Als U dus op 1200 Baud wilt werken kunt u het beste 
DEASE opnieuw naar cassette schrijven, maar nu op 1200 Baud, met 
RUN _ "DEASE-V2.O" wordt dan ook de rest van de lees/schrijf 


operaties op 1200 Haud uitgevoerd, Een andere mogelijkheid is om 
voordat U informatie heeft ingetikt DEASE met het O-commando te 
verlaten en de COS op 1200 Raud te zetten, waarna DERABE weer 


gestart kan warden met LIN #8Dog . NE:Doe dat wel voordat U iets 
heeft ingetoetst want Ouit heeft tat gevolg dat de in het 
geheugen aanwerige informatie miet meer daor het programma als 
geldig wordt gezien. 

Na intoetsen van  !% zien we Het scherm als im figuur 2 
weergegeven. Na de prompt : toetsen we nu de gewenste filenaam in 
ern na SCKR: volgt dan de FLAY TAFE boodschap, (of de file wordt 
geladen bij disk systemen) waarna U weer ZERE of ZSFACE: toetst 
zoals gebruikelijk. Als het laden succesvol verlopen is geeft het 
systeem de melding READY waarna de band stop gezet kan worden. 
Ei j een fout verschijnt fig.4, we moeten dan opnieuw de 
laadprocedure doorlopen. 


2) INSERT. 


Dit commande dient om nieuwe anfammatie aam ons bestand toe te 
voegen. In het mummerveld verechi jnt het mummer van het nieuwe 
record (de nieuwe Kaart) en de veldnamen worden gelist, waarna we 
ori Amf ermal dee Parren drteset eters. 

Het commando kan op twe manieren beeindigd worden: 

e)>Dovor alle 10 de velden in te vullen. 

b)Door als laatste lLarakter voor de SCKR: een 
Er verschijnt in beide gevallen de boodschap: 
PRESS "*“ TQ GET BACH TO MENU. 

Fils we nog meer willen toevoegen deuken we op een willekeurige 
toets behalve "7" en het volgende record Kan ingevoerd worden. In 
het andere geva) zal het menu weer verschijnen. 


nen 


in te toetsen. 


Mugelijke fouten: 
Ingevoerde gegevens moeten op het scherm passen anders worden ze 
miet geaccepteerd. 
Verder mag de totale lengte inclusief £SCRi'e miet groter zijn dar 
2559 karakters, Ie dit toch het gevel dar zal de laatst ingevoerde 


Lek 


regel niet opgeslagen worden en volgt er eer fautmelcing. 


LIST. 


De ingevoerde informatie kan bekeken worden met het LIST 
commando. Na toetsen van "LL" zien we fig 6. Het syteem vraagt nu 
welk gedeelte van het bestand gelist moet worden. We hebben de 
volgende mogelijkheden: 
a)Alles: toets <CRE . 
b)Van begin tot record nummer a 
toets: FROM: OSCRE 
TO zasCRE 
(waarbij a een nummer is tussen 0 en 255 
c)van record nummer a tot en met record nummer b 
toets: FROM: asCR> 
TO zbSCKE 
dìvan record nummer & tot en met het laatste record. 
toets: FROM: asc: 





TO :25E5CRE 
Als het listen klaar is Kunnen we weer met "* terug naar het 
menu. Ook tussentijdse teruybeer naar Het menu ie mogelijk d.m.v. 
nn 
S)EDIT. 
Dit commando gebruiker we als we informatie au eer al bert aam 


record willen toe voegen, dan wel om anformatie te verbeteren. Na 
het geven van het commando "E" vraagt het programma om het nunmer 
van het te wijzigen record. zie fig.7) We toetsen het nummer mu 
in, gevolgd door een SCRE (Oiemummers=255). Het bij een record 
behorend nummer kunnen we vaststellen m.b.v. de LIST of FIND 
commamdo’ s. 

Het gewenste record wordt ru op het scherm geliet en we kunnen op 
de normale manier (m.b.v. copy=s deleten en cursortoetsen) regel 
voor regel aanpassen. Heeirndigen van het editen en terugkeer naar 
het menu gaat op dezelfde manier ele bij het Insert commando. 





O REPLACE. 


Replace gebruiken we als we een bepaald record niet meer nodig 
hebben en het willen vervangen door een ander record. (NE: Dit 
resultaat kunnen we ook bereiken d.m.v. een DELETE-commando 
gevolgd door een INSERT-commando) . 

Het systeem vraagt net als bij EDIT om het nummer van het te 
vervangen record. Daarna wordt het record, met het ingevoerde 
nummer, verwijderd en kunnen we de nieuwe informatie invoeren. 
Afsluiten van het commando weer ale bij INSERT, 


7)DELETE. 


Met delete lunnen we records, die we miet meer nodig hebben, 


verwijderen. Het invoeren van de gewenste nummers gaat hetzelfde 
als bij het list commando. Als we meer dan 5 records in een keer 
willen verwijderen vraagt het systeem of we dat zeker weten 
(fig.8). 

Terugkeren naar het menu geat weer met het commando 
NE: Records die met dit commando verwijderd zijn kunnen niet meer 
hersteld worden (zoals bijv. met OLD im BASIC). Kijk dus van te 
voren goed uit welke records je weggooit. 





nan 


We kunnen nu het door ons ingevoerde bestand sorteren en wel naar 
de verschillende velden. 

In ons voorbeeld var: een adressen bestand kunnen we dus op naam 
sorteren of op straat, postcode of telefoonnummer. Er is maar EEN 
voorwaarde waar aan voldaan moet zijn em dat is dat in alle 
records het veld aanwezig moet zijn waarop gesorteerd wordt (er 
mag ook alleen een <CR* staan). Dit is bijv. niet het geval als 
we bij INSERT na de definitie van PLAATS met © de INSERT-mode 
verlaten, waardoor dan het veld TELEFDON niet gedefinieerd is. 
Als we wel op telefvon nummer willen sorteren moeten we dus ook 
een telefoonnummer invullen hetzij een leeg veld aAnvullen door 
alleen op SER: te drukten na TELFDON:. 

Ale we touch proberen een bestand te sorteren op een naet bestaand 
veld krijgen we weer de foutmelding uit faguur 4. 


Na het geven van het commando "&'" vraagt het systeem om het 
veldnummer waarop het bestand gesorteerd meet worden (fig.9). De 
velden zijn genummerd 0 t/m 9 (dus “NAAM: " ie veldnummer O im Dn 
voorbeeld en "TELEFOON: " veldnummer 2). Na het invoeren van het 


gewenste veld verschijnt de melding: "PLEASE WAIT WHILE SORTING". 
Dit wachten kan bij grotere bestanden wel enige tientallen 
stonden bedragen. 

Ale het bestand gesorteerd is keren wt automatisch weer terug 
naar het Hoctfdmernu. 


SIFIND. 
Dit cammando stelt ons ir staat om records met een bepaalde 
inhoud te vonden. Het eyvsteem kan zoeken tet op drie zoekstrings 


dus Da jvz Zuek mean record van FIETERBEN uit de FAZANTSTRAAT te 
BLARICUM. We toetsen ou bij de vragen van het eyteem het volgende 
in: 


FIRST SEARCH STRING: 
FIETERSEN: CR: 

SECOND SEARCH STRING: 
FAZANTSTRAATHER: 


THIRD SEARCH STRING: 
BLARICUM EER 


Waarna het systeem alle records list met die inhoud. We kunnen 
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echter Gok miet bedoelde records vinden zoels van de heer 
OPBLARICUMHOOFD uit de NODMEERFAZANTSTRAAT te FIETERSENDORF, We 
moeten dus een doordachte keuze maten bij het definieren van onze 
zoekstring. 
Willen we maar een of twee zoekstrings definieren dan gaat dat 
als volgt: 


FIRST SEARCH STRING: 
PIETERSEN"S CR 


waarne alle voorkomende FIETERSEN’s gelist zullen worden. Het 
listen kan net als bij de normale list-functie afgebroken worden 
met "*", Elke andere toets zal het listen gewoon voortzetten. Als 
de door ons opgegeven zoekstraing of combinatie van zoekstrings 
niet in ons bestand voorkomt zal het menu weer verschijnen. 


10) SAVE. 

Save dient, zoals iedereen wel zal weten om het gecreeerrde 
bestand naar tape of dish te echrijven. Het systeem vraagt weer 
om een filenaam en ral daarra de file saven. Na afloop volgt de 
boodschap "READY". Dmv. Er dr ul op een willekeurige toets 


komen we weer ir het Hoofdmenu. 


Dit commando geeft ons de mogelijkheid om #-cammando’'s te geven 
vanuit het DEASE-programma bijv.: XK. of XNOMON etc. (ook eigen 
gemaakte t-com's zijn natuurlijk mogelijk). Na het invoeren var 
een K-commardo kunnen we d.m.v. "SN weer terug naar het menu ot 
door een andere toets in ter drukken nog een *-com. geven. 


12)DUIT. 


Hiermee beeindigen we DBASE en keren terug naar het operating 
systeem. Eer eventueel in het geheugen aanwezige file wordt ma 
opnieuw opstarten van DRASE riet meer als zodanig herkend t!!, 
Eerst SAVEN en dan pas OUIT dus. Het systeem geeft wel een 
waarschuwing dat dit kam gebeuren (fig.10) zodat we onze fout nog 
tijdig kunmen herstellen. 


PS: Wer COMMANDO PRINT ZAL VOLGENDE KEER GESRKOVEN WORDEN, 


Will Verntoeven 
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„CKEATE 
s… INSERT 
„FIND 


„DELETE 
‚SORT 
‚LIST 
„LOAD 
‚SAvc 


‚-QUIT 


(c) 
(1) 
Cr) 
(PD) 
Cs) 
(u) 
(4) 
1) 
(a) 


Fie: 1 


EDIT (€) 
‚„RePuAace(r) 
._%- COM (x) 
. PRINT (P) 








CUtsor TITEL VELD 





Flo: Ja 


DATABASE V1.@ MODE ‘Cc 
Jrensssen oestano 


NA AM 
STKAAT: 
PLAATS: 
TELE FOON: 


% 





: PLEASE ENTER MAINERAME 


E16: Ac 


DATABASE V1.O MODE : € 


PLEASE ENTER FILENAME: 
> 






MDATABASE V1,@ MODE * I 


NAAM g 
STRAAT: 
PLAATS: 
TELEFOON: 

















PLEASE ENTER ATA 








DATABASE V1,@ 


ERROR - PRESS A KEY 





ELG: y 


DATABASE V1,@ 


NAAM 
STRAAT 


‘ PIETERSEN IJ. 
: FRAZANTsTRAAT Sb 
VOPOXX BLAEICUM 
TELEFOON: 030-8888808 


tg 


PLAATS : 


: PLERSE ENTER DATA 


t6 


DATABASE V2,O MODE : L 


ENTER RE CORDNUMBENS 


mmm em 


PLE ASE CONEIMM MASSIVE 
PELETION [Y/n]:4 


Elo: 8 


WHICH RECORD: Z 


7 PLEASE ENTER RECOUDNUMGER 


nn 


SORT ON WHICH Zugstrine [o:o): B 








FIG: g 


DATABASE V2.@ MODE : Q 


THIS COMMAND DELETES THE 


ENTIRE Five! 


vuoceen ? [Y/N): B 





Fi6:410 


TOETERS 6 BELLEN VAN DE JOSBOX 


In AcornNieuws 3 '83 werd geconstateerd dat de Josbox af en toe kuren vertoont 
bij gebruik van het statement READ. Dit heeft mij er toe aangezet om enkele (ei- 
gen)aardigheden van deze kit nader uit te spitten. 


Om te beginnen heb ik twee slordigheidjes ontdekt in de statements COPY en XDUMP. 
Een opdracht als COPY #8201, #8300, #8200 kopieert Inderdaad het gebied 

#8201 - #8300 naar #8200 - #82FF, maar andersom gaat het fout, dus bij COPY #8200, 
#82FF, #8201. Dan wordt #8200 naar #8201 gekopieerd, vervolgens #8201 (= #8200) 
naar #8202 enz., zodat er een soort FlLL-commando ontstaat dat het gebied 

#8200 - #8300 vult met de waarde van #8200. Als het van-gebied en het naar-gebied 
elkaar niet overlappen gaat het echter in beide richtingen wel goed. 

Het eindadres mag overigens niet #FFFF zijn, omdat #FFFF + 1 in dit geval gelijk 
aan nul is en dat is kleiner dan #FFFF, zodat COPY gewoon door gaat. 

XDUMP drukt, waar mogelijk, ascii karakters af, maar met het karakter #7F (DEL) 

kun je dat beter niet doen. Probeer maar eens: XDUMP#DDBO, #DDDO en kijk wat er 
overblijft van de regel waar DDCO: voor staat. 


Het probleem dat zich voordoet bij COPY treedt ook op bij RELOC. Bovendien werkt 
RELOC (uiteraard) niet op tabellen en data. Alleen pure machinetaalinstructies wor- 
den correct geRELOCeerd, Maar ook daar moet je mee oppassen. Neem b.v. RELOC#C200, 
#CAO0, #E200. De bytes #CZEI, #C2E6, #C2EB en KC2EF zouden ook aangepast moeten 
worden. Dit is principieel onmogelijk, omdat computers wel kunstmatig, maar nog 
lang niet intelligent zijn. Gebruik RELOC dus met overleg. 


TXMOD zet de RDCH- en WRCH-vectoren terug op resp. #FE9h en #FES52. Als je, net 

als ik, nieuwe lees- en schrijfroutines hebt gemaakt (met auto-repeat, keyclicks, 
vertraagd afdrukken e.d), dan ben je die mooi kwijt als je TXMOD uitvoert. Eigen- 
lijk zou GRMOD de beide vectoren moeten opslaan, zodat TXMOD deze weer terug kan 
zetten. De Josbox gaat er kennelijk niet van uit dat je zelf ook nog uitbreidingen 
maakt. 


